Emacs Part 42

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

前スレ

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

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

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

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

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

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

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

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

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

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

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

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

まーな

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

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

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

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

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

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

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

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

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

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

[0925 924 2013/05/02(木) 20:46:42.84]

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

[0926 922 2013/05/02(木) 21:16:43.63]

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

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

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

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

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

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

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

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

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

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

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

[0932 名無しさん＠お腹いっぱい。 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 を使うべき。

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

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

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

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

[0934 名無しさん＠お腹いっぱい。 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の存在そのものを消しているわけではないような気がします。
これを完全に削除するにはどうしたらいいでしょうか？

[0935 934 2013/05/06(月) 06:52:54.57]

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

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

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

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

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

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

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

[0939 名無しさん＠お腹いっぱい。 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にしようとして上記の書き込みになりました。

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

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

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

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

[0941 939 2013/05/06(月) 20:26:17.68]

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

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

>>937
(unintern 'hoge)

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

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

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

勢いが足りない

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

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

[0946 名無しさん＠お腹いっぱい。 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
って何回も出て来るんだけど

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

cp932じゃあかんの？

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

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

[0949 945 2013/05/14(火) 10:32:42.87]

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

[0950 名無しさん＠お腹いっぱい。 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"))

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

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

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

[0952 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")))

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

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

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

BASICはANSIなのか。

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

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

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

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

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

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

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

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

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

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

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

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

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

> *→.へ変えたところ

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

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

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

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

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

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

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

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

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

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

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

名言すまん。

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

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

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

そうだ。

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

何も書かないこともLisp

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

セックスと嘘とLisp

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

ちんことまんことLisp

[0972 名無しさん＠お腹いっぱい。 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)

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

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

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

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

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

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

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

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

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

[0977 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)
>でもいいかもしれない。
日本語メインのときには、こちらで使うことにしました。
ありがとうございます。

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

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

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

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

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

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

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

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

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

>>981
はつみみです。

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

github のあれ?

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

> github のあれ?

ソレ

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

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

[0986 名無しさん＠お腹いっぱい。 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: と表示されるようになりました。
カーソルの色を変える代替方法はないでしょうか？

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

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

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

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

Emacsの構造

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

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

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

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

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

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

emacsの友達欲しい

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

>>991
M-x doctor

[0993 名無しさん＠お腹いっぱい。 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.

[0994 993 2013/06/09(日) 02:19:45.23]

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

[0995 986 2013/06/09(日) 11:44:36.34]

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

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

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

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

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

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

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

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

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

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

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

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