Emacs Part 42

**名無しさん＠お腹いっぱい。** · 2012/12/24(月) 12:26:20.01

前スレ

Emacs Part 41
http://toro.2ch.net/test/read.cgi/unix/1347009022/

**名無しさん＠お腹いっぱい。** · 2013/04/29(月) 20:46:53.70

中身全然読んでないけど非同期IOはできるみたいだね
http://www.gnu.org/software/emacs/manual/html_node/elisp/Processes.html

**名無しさん＠お腹いっぱい。** · 2013/04/29(月) 20:48:41.63

mewがやってる

**名無しさん＠お腹いっぱい。** · 2013/04/29(月) 21:03:39.51

githubにdeffered.elとかあるけど使い方がよくわからん
同作者のemacs-epcとか使ってemacs外部と直接関数呼び出し、戻り値の形式でやり取りできたら面白そうと思ったけど
プロトコルがわからん
単に長さ付きのS式でやり取りしてるなっていうのはまぁわかるけど

**名無しさん＠お腹いっぱい。** · 2013/04/29(月) 21:15:02.68

dbus.elを使えばデータの受け渡しなどはできそう。

**名無しさん＠お腹いっぱい。** · 2013/04/29(月) 21:32:08.60

>>902
> >>901
> emacsとプロセスとのデータのやりとりは？
> 特にプロセスからemacsにデータとかわたせるの？しかも非同期にとか
立ち上げたプロセスと標準入出力でやり取りする。
send-process～とかあるよ。
あとはset-process-filterとかsentinelとか使えばやりとりできます。

**名無しさん＠お腹いっぱい。** · 2013/04/29(月) 21:38:37.14

それが面倒だからわざわざdbus.elとか使うんだよなぁ…
非同期プロセス関連は長年メンテされてるelispでもバグだらけで
とても素人が使えるものじゃないって代物だわ

**名無しさん＠お腹いっぱい。** · 2013/04/29(月) 21:44:23.71

>>908
> 非同期プロセス関連は長年メンテされてるelispでもバグだらけで

例えばどのelispだろう?そんなに酷くない気がするけど。

**名無しさん＠お腹いっぱい。** · 2013/04/29(月) 21:55:31.13

vc.elとかgnus.elみたいな標準のでもバグ報告でしょっちゅうerror in process sentinelでてる
ためしにこのエラーメッセージで検索したらひっかかるわひっかかるわ
ノンブロッキングIOなんて昔からバグの温床だしそんなもんといえばそんなもんか

**名無しさん＠お腹いっぱい。** · 2013/04/29(月) 22:05:59.36

buffer消しちゃったりしたときのアレかな。バグといっていいのかどうか。
Emacsが対話環境も提供する以上、ある程度は仕方ない気がする。

**名無しさん＠お腹いっぱい。** · 2013/04/29(月) 22:52:47.50

>>908
> それが面倒だからわざわざdbus.elとか使うんだよなぁ…
ん、dbus.elってなに？全然しんらないんだけど・・。

**名無しさん＠お腹いっぱい。** · 2013/04/30(火) 01:40:40.28

>>898
あざーっす。
試してみます。

**名無しさん＠お腹いっぱい。** · 2013/05/01(水) 21:24:07.09

lispで質問です。
以下のようなリストがあるとします。
(hoge '(("a" a) ("b" b) ("b" b) ("b" b) ("c" c) ("b" b) ("b" b) ("b" b)))

このなかでシンボルcを持つエレメントをみつけて削除したいのですが、すごくめんどくさくて困ってます。
hogeの中身が連想リストの場合は
(setq hoge (delete (rassq 'c hoge) hoge)
ですむのですが、
hogeが連想リストじゃないので、rassqが使えません。
なので do をつかって
(let* ((hoge '(("a" a)
("b" b)
("b" b)
("b" b)
("c" c)
("b" b)
("b" b)
("b" b)))
find)
(do ((cnt 0 (1+ cnt)) ) ((or find (null (nth cnt hoge))) )
(when (setq find (eq 'c (car (cdr (nth cnt hoge)))))
(setq hoge (delete (nth cnt hoge) hoge))))
hoge)
といったコードになってしまいます。
もっとシンプルにできる方法はないでしょうか？

**名無しさん＠お腹いっぱい。** · 2013/05/01(水) 21:47:13.65

>>914
("c" c) って要は ("c" . (c)) のことなんだから
eq?じゃなくてequal?を使うrassocの方を使って
(setq hoge (delete (rassoc '(c) hoge) hoge)
でいいんじゃないの？

**名無しさん＠お腹いっぱい。** · 2013/05/01(水) 22:15:20.92

>>915
あ、できました。
ありがとう。
というか、
>("c" c) って要は ("c" . (c)) のことなんだから
ここらへんの理解が適当でした。

**名無しさん＠お腹いっぱい。** · 2013/05/01(水) 23:20:24.97

>("c" c) がなんかのアスキーアートに見えてしょうがないんだが．．

**名無しさん＠お腹いっぱい。** · 2013/05/02(木) 00:07:02.47

そもそも cons cell にしとけばいいのに
別にいいけど

**名無しさん＠お腹いっぱい。** · 2013/05/02(木) 08:35:44.29

>>918
お前わかってねーな

**名無しさん＠お腹いっぱい。** · 2013/05/02(木) 13:47:07.21

まーな

**名無しさん＠お腹いっぱい。** · 2013/05/02(木) 20:10:49.30

>>899
できました。ありがとう俺！

**名無しさん＠お腹いっぱい。** · 2013/05/02(木) 20:34:13.97

ある特定のメジャーモードで動いているとき、もしくは特定のバッファだけ、
ある既存関数の挙動を置き換えたいんですが方法ありますか？

defadviceとかだと、他のモードやバッファでの動作もかわっちゃいますよね。

**名無しさん＠お腹いっぱい。** · 2013/05/02(木) 20:44:49.31

defadvice の先頭にメジャーモードの判定を入れるのはどう？

(defadvice hoge (around hoge-advice activate )
(if (eq major-mode 'huga-mode)
(なんか処理)
ad-do-it))

**名無しさん＠お腹いっぱい。** · 2013/05/02(木) 20:45:41.84

defadviceしてその中でmajor-modeとか使って分岐すればいいじゃん。

**924** · 2013/05/02(木) 20:46:42.84

速さも中身でも負けた。完敗です。

**922** · 2013/05/02(木) 21:16:43.63

>>923
ありがとうございます。
これでいってみます。

**名無しさん＠お腹いっぱい。** · 2013/05/02(木) 21:24:18.52

CLOSて使ってる人あまりいないん？
built-inパッケージでもCEDETとかぐらいぽいし、
デメリットとかあるのかな？

**名無しさん＠お腹いっぱい。** · 2013/05/02(木) 22:55:31.31

elispでclos使えることを今知った

**名無しさん＠お腹いっぱい。** · 2013/05/03(金) 04:01:57.42

>>922
after-change-major-mode-hook とかでアドバイス自体を有効/無効にする
ってのはどうでしょ
ad-enable-regexp と ad-disable-regexp でまとめて切り替えられるし

**名無しさん＠お腹いっぱい。** · 2013/05/03(金) 08:02:43.18

define-minor-modeでマイナーモード作ってるんですが
(my-minor-mode)
が呼ばれたときに、内部で条件判定を行ってモードをonにしたくないときってどうすればいいんでしょうか？
define-minor-modeのbody内部の記述だけでは無理？

**名無しさん＠お腹いっぱい。** · 2013/05/03(金) 20:34:15.36

リストにあるファイルをstart-processに渡すdolistを書いていたのですが
ファイルがある一定数以上になると
Creating pipe: too many open files
といわれてしまいどう対処すべきかわかりません。
パイプ数を増やそうとおもってulimit -pしてみたのですが変更できないみたいです。
デフォではパイプが８ぽいので、ファイルが８までは大丈夫でそれを超えると上記のメッセージがでます。
パイプ数を変更できない場合は、どのように対処したらよいでしょうか？

**名無しさん＠お腹いっぱい。** · 2013/05/03(金) 21:32:23.07

>>930

define-globalized-minor-mode あたり使うといいかも。

auto-complete-mode-maybe が参考になるはず。

あるいは (my-minor-mode -1) して関数内で強制的に off にするとかかな？

>>931

concurrent.el あたりを使えばできそうな気はする。
dolist の中で待ちが発生していいなら start-process じゃなくて call-process を使うべき。

**名無しさん＠お腹いっぱい。** · 2013/05/03(金) 22:58:18.89

>>932
ありがとうございます。
>define-globalized-minor-mode
調べてみます。

>concurrent.el
こんな便利なのがあるんですね。
deferredとかも。
いろいろ使えそうなので見てみます。

>dolist の中で待ちが発生していいなら start-process じゃなくて call-process を使うべき。
待たせたくないので↑の方法でいってみます。

**名無しさん＠お腹いっぱい。** · 2013/05/06(月) 06:47:39.55

make-variable-buffer-localで作成した変数を削除することはできませんか？
たとえば
(setq hoge 10)
(make-variable-buffer-local 'hoge)
(setq hoge 0)
(print hoge)
で 0 になり
(kill-local-variable 'hoge)
(print hoge)
10 になります。
しかしここで
(setq hoge 5)
を行うと、hogeはlocal-varになってしまうようです。
上のコードをdescrible-variableで確認すると
global > global + local > global > global + local
になっているようで、kill はあくまで現在の参照先をglobalにするだけで、
localの存在そのものを消しているわけではないような気がします。
これを完全に削除するにはどうしたらいいでしょうか？

**934** · 2013/05/06(月) 06:52:54.57

補足ですが、globalに明示的にセットするのであればsetq-defaultでいけますが、
外部パッケージでsetqされている変数なのでその方法は使えない状態です。

**名無しさん＠お腹いっぱい。** · 2013/05/06(月) 11:27:00.33

make-variable-buffer-local ではなく make-local-variable を使う

**名無しさん＠お腹いっぱい。** · 2013/05/06(月) 13:17:32.14

>>936
外部パッケージでmake-variable-buffer-localされているので無理な状態です。
初期化関数内でmake-variable-buffer-localされているなら
defadviceでおきかえてmake-local-variableを使うようにできますが
関数外なのでそれも無理です。

**名無しさん＠お腹いっぱい。** · 2013/05/06(月) 13:52:52.34

>>937
どうしたいのかいまいちわからんな。
具体的なパッケージの名前も出してみたら？

**名無しさん＠お腹いっぱい。** · 2013/05/06(月) 16:52:07.63

>>938
emacs-clang-complete-asyncです。
c++-modeバッファ毎にclang-completeプロセスを常駐させるので
８個以上開くと、pipe errorになります。
これを回避するために、バッファ毎にプロセス作成しているのをやめて、
常に１つのみ常駐にして
window-configuration-change-hook
でウィンドウ切り替えを検出し、
selected-window
のバッファローカル変数のcflagsをプロセスに送信してコマンドライン更新を行うようにしたいのです。
ぶっちゃけ、パッケージソースのほうをいじってしまえば直ぐに終わるのですが
あまり外のを汚したくないので自分側でパッチを当ててます。
その一環で、プロセスオブジェクトを保存する変数が
make-variable-buffer-localされてしまっているのを
kill-local-variableして、globalにしようとして上記の書き込みになりました。

**名無しさん＠お腹いっぱい。** · 2013/05/06(月) 17:05:20.29

>>938
ちょっと、パッケージのほうを書き換えて実験してみたんですが
window-configuration-change-hook
はあくまでサイズ変更とかでcallされるのであって
ウィンドウ選択だけでは呼ばれないのですね。
というわけで失敗・・。
C-x oでウィンドウを選択操作する毎に呼び出されるフックとかがあるといいのですが・・。
最悪 other-windowをdefadviceすればできますが・・。
other-windowだけでなく、
その他バッファをウィンドウに表示する関数や切り替え系をいろいろやらないと
どんなケースでもよろしく動くようにならない気がします。

とりあえず、可視ウィンドウでかつ選択されているバッファを取得して処理したい。
取得＆処理したいタイミングは、それらに切り替わった瞬間。
ということですかね。

あちこちにdefadviceしたりせずにもっと、シンプルに扱える仕組みとかないですかね。

**939** · 2013/05/06(月) 20:26:17.68

とりあえずやりたいことは
defadvice select-window (after
で全て解決できました。
ただ、こういうbuilt-inのもっともよく使われる基底の関数をdefadviceするってどうなんですかね。

**名無しさん＠お腹いっぱい。** · 2013/05/06(月) 22:33:41.46

>>937
(unintern 'hoge)

**名無しさん＠お腹いっぱい。** · 2013/05/06(月) 22:42:43.11

>>942
あざーす。
うまくいきました。
global/local一気に削除して、
自分で再定義すればいいわけですね。

**名無しさん＠お腹いっぱい。** · 2013/05/13(月) 00:20:53.50

勢いが足りない

**名無しさん＠お腹いっぱい。** · 2013/05/13(月) 17:44:44.02

C-SPCでset-mark-commandして、マウスでキャレットを移動させた後にC-wでkill-regionしても動作しない。
C-SPCからキーボードでキャレット移動させた場合はきちんとkill-regionできるようにはできないですかね？

**名無しさん＠お腹いっぱい。** · 2013/05/14(火) 01:54:59.97

emacsでwindows31Jって使えない？
ruby書いてる時に
Warning (mule): Invalid coding system `Windows-31J' is specified
for the current buffer/file by the :coding tag
って何回も出て来るんだけど

**名無しさん＠お腹いっぱい。** · 2013/05/14(火) 02:22:10.51

cp932じゃあかんの？

**名無しさん＠お腹いっぱい。** · 2013/05/14(火) 02:22:23.50

>>945
24.3.1だと希望通りの動作です。
右ボタンだとどうなりますか?

**945** · 2013/05/14(火) 10:32:42.87

>>948
Emacs24.1だったんですが、24.3に上げたら希望通りの動作になりました。
ありがとう

**名無しさん＠お腹いっぱい。** · 2013/05/16(木) 14:37:05.83

fletを使って既存の関数の挙動を変えたいんだけど、flet中で元の(オリジナルの)関数を呼びだすのってどうやればいいの?
例えば message を「与えられた引数にhogeを付け加えて表示する」に変える場合、愚直に

(flet ((original-message (str)
(message str))
(message (str)
(original-message (concat "hoge " str))))
(message "hello"))

とすると当然無限ループになってしまう。

**名無しさん＠お腹いっぱい。** · 2013/05/16(木) 16:12:52.27

(apply (symbol-function 'message) '("hello"))

**950** · 2013/05/17(金) 20:00:55.81

>>951
なるほど。こうですね。

(require 'cl)

(lexical-let ((original-message (symbol-function 'message)))
(flet ((message (str)
(funcall original-message (concat "hoge " str))))
(message "hello")))

**名無しさん＠お腹いっぱい。** · 2013/05/17(金) 20:05:58.16

なんでvisual-basic-modeがあるのにfree-basic-modeがないのか疑問
自分で作れという暗示か

**名無しさん＠お腹いっぱい。** · 2013/05/18(土) 15:45:25.38

BASICはANSIなのか。

**名無しさん＠お腹いっぱい。** · 2013/05/22(水) 23:26:04.19

メール管理にRMAILを日常的に使ってる人っている？
居たら使い勝手を教えて欲しい。

**名無しさん＠お腹いっぱい。** · 2013/05/22(水) 23:32:13.04

使い勝手いいわけないだろ。

**名無しさん＠お腹いっぱい。** · 2013/05/23(木) 00:19:20.27

いや、薄々感づいてはいたけど、やっぱりそうなんだね。

**名無しさん＠お腹いっぱい。** · 2013/05/23(木) 09:49:37.79

rmsは今でもRMAIL使ってるらしいぞ。

**名無しさん＠お腹いっぱい。** · 2013/05/26(日) 15:04:17.38

guile emacs使ってる人いる
自分は今ビルド中

**名無しさん＠お腹いっぱい。** · 2013/05/29(水) 15:53:22.90

最近org-modeを使い始めたのですが、見出し記号を
*→.へ変えたところ折り畳み、開いたりの動作は
正常に動きますが階層ごとの色付けがなくなりました。
outline-modeへ切り替えると動作、色もちゃんと表示されます。
どのような設定をすべきなのでしょうか？
ザウルス + emacs22.1 (org v.4.67c)

**名無しさん＠お腹いっぱい。** · 2013/05/29(水) 17:19:13.02

> *→.へ変えたところ

なんでそんな欝陶しいことするんだろう。友達いないのかな？

**名無しさん＠お腹いっぱい。** · 2013/05/29(水) 17:26:18.88

友達の件はそっとしといてやれよ。

**名無しさん＠お腹いっぱい。** · 2013/05/29(水) 22:11:32.86

今までemacsが末尾再帰最適化をしなかった理由は動的スコープで実相が面倒だったから？
もしそうだとするとemacs25辺りから末尾再帰最適化されるようになるかな

**名無しさん＠お腹いっぱい。** · 2013/05/30(木) 11:35:03.12

Lispなんか気楽に手続き的に書けばいいと思うんだ

**名無しさん＠お腹いっぱい。** · 2013/05/30(木) 15:42:42.61

そうやって書いていたらなんでLisp書いてんだろって思ってLisp書かなくなった

**名無しさん＠お腹いっぱい。** · 2013/06/01(土) 12:22:13.49

Lisp は何かのために書くものじゃない。
書くということが Lisp そのものなんだ。

名言すまん。

**名無しさん＠お腹いっぱい。** · 2013/06/01(土) 12:41:09.81

じゃ、この書き込みもLispか？

**名無しさん＠お腹いっぱい。** · 2013/06/01(土) 13:41:39.41

そうだ。

**名無しさん＠お腹いっぱい。** · 2013/06/01(土) 14:39:12.23

何も書かないこともLisp

**名無しさん＠お腹いっぱい。** · 2013/06/02(日) 18:39:43.64

セックスと嘘とLisp

**名無しさん＠お腹いっぱい。** · 2013/06/03(月) 23:09:14.19

ちんことまんことLisp

**名無しさん＠お腹いっぱい。** · 2013/06/05(水) 15:46:55.09

日本語検索するのに
(define-key isearch-mode-map "\C-o" 'isearch-edit-string)
と設定しており、C-s C-oで日本語検索しているのですが、
C-sだけで日本語検索までできないでしょうか？

以下のように設定しても、isearch-edit-stringが機能してないのか、
下の編集ラインにカーソルが移動しません。

(defun my-japanese-search ()
(interactive)
(isearch-forward)
(isearch-edit-string) )
(global-set-key "\C-s" 'my-japanese-search)

**名無しさん＠お腹いっぱい。** · 2013/06/06(木) 23:47:39.22

>>972
migemoは使ってみました？

**名無しさん＠お腹いっぱい。** · 2013/06/07(金) 01:16:55.96

>>959
その後どうなった？どの程度の完成度なのか気になる。

**名無しさん＠お腹いっぱい。** · 2013/06/07(金) 02:10:14.01

>>974
なんかmakeしてもemacs23.1が出来ただけでよくわからなかったから自分で試して

**名無しさん＠お腹いっぱい。** · 2013/06/07(金) 11:40:26.33

>>972
つ (setq cursor-in-echo-area t)

使い方によっては、
(global-set-key "\C-s" 'search-forward)
でもいいかもしれない。

**972** · 2013/06/07(金) 16:33:36.22

>>973
日本語エディタとして使う機会のほうが多いので

>>976
>つ (setq cursor-in-echo-area t)
(setq cursor-in-echo-area nil)との切り替えがどうもしっくり行きませんでした。

>(global-set-key "\C-s" 'search-forward)
>でもいいかもしれない。
日本語メインのときには、こちらで使うことにしました。
ありがとうございます。

**名無しさん＠お腹いっぱい。** · 2013/06/07(金) 16:59:18.10

日本語メインだからこそ migemo じゃないのかな。

**名無しさん＠お腹いっぱい。** · 2013/06/07(金) 21:41:47.05

migemoってまだメンテされてるの？

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 14:03:03.51

どうしてemacs-jpはｱｯという間に廃れたのだろう？

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 14:11:47.57

ユーザが困ってる問題自体 emacs+日本語処理じゃなく外部プログラム+文字コードだからじゃね

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 14:21:47.48

>>981
はつみみです。

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 15:12:39.26

github のあれ?

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 17:50:44.55

> github のあれ?

ソレ

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 18:08:09.88

helmのmoccurで検索文字入力中にC-hでbackspaceと同じことをさせたいのですが、
どう設定すればいいのでしょうか

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 19:56:35.70

OSXのemacsで
(mac-set-input-method-parameter "com.justsystems.inputmethod.atok25.Japanese" 'cursor-color "lightblue")
のように設定して、日本語のONOFFによってカーソルの色を変えていたのですが、
http://www.emacsformacosx.com/のemacs24.3にしてから
Symbol's function definition is void: と表示されるようになりました。
カーソルの色を変える代替方法はないでしょうか？

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 20:13:08.79

> どうしてemacs-jpはｱｯという間に廃れたのだろう？

> おっさんは若者をそう叩くなよ
> 足は引っ張らず温かく見守れ

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 21:11:22.38

Emacsの構造

若者＞＞＞＞＞越えられない壁＞＞＞＞＞おっさん

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 21:20:36.18

30歳超えてもまだ若者のつもりか

**名無しさん＠お腹いっぱい。** · 2013/06/08(土) 22:22:25.93

Emacsはおっさんを中二病に誘う

**名無しさん＠お腹いっぱい。** · 2013/06/09(日) 01:53:42.71

emacsの友達欲しい

**名無しさん＠お腹いっぱい。** · 2013/06/09(日) 02:09:32.59

>>991
M-x doctor

**名無しさん＠お腹いっぱい。** · 2013/06/09(日) 02:19:12.18

>>992

I am the psychotherapist. Please, describe your problems. Each time
you are finished talking, type RET twice.

I want friends.

Why do you say
i want friends?

yep, give me friends.

Is it because of your plans that you say
yep give you friends?

suck.

Can you elaborate on that?

u r THE fucker

Maybe your life has something to do with this.

**993** · 2013/06/09(日) 02:19:45.23

ゴメン途中で投げちゃったけどこんな機能あるんだねｗ

**986** · 2013/06/09(日) 11:44:36.34

>>986
パッチ版を入れたら解決しました。

**名無しさん＠お腹いっぱい。** · 2013/06/09(日) 12:11:47.11

今見てきたが、これは廃れたというか、立ち上がらなかったんじゃないか?
トップページがちょっとゆるすぎる気がする。

**名無しさん＠お腹いっぱい。** · 2013/06/09(日) 13:26:42.15

前にもなんかハブサイト作ろうとして失敗してなかったか

**名無しさん＠お腹いっぱい。** · 2013/06/09(日) 13:55:45.81

>>985
自己レス　helm-c-moccur-helm-map をいじればいいみたいだ

**名無しさん＠お腹いっぱい。** · 2013/06/09(日) 14:06:31.17

次スレを立てました。リンクをいくつか追加してみました。

Emacs Part 43
http://toro.2ch.net/test/read.cgi/unix/1370754332/

**名無しさん＠お腹いっぱい。** · 2013/06/09(日) 14:13:39.98

まだまだemacsはやめられない

**１００１** · Over 1000

このスレッドは１０００を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。