Emacs Part 43

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

語り合いましょう。

GNU Emacs - GNU Project - Free Software Foundation (FSF)
https://www.gnu.org/software/emacs/

EmacsWiki: サイトマップ
http://www.emacswiki.org/emacs/

Emacsのトラノマキ | 検索結果: | ありえるえりあ
http://dev.ariel-networks.com/wp/?s=Emacs%E3%81%AE%E3%83%88%E3%83%A9%E3%83%8E%E3%83%9E%E3%82%AD

前スレ
EmacsPart42
http://toro.2ch.net/test/read.cgi/unix/1356319580/

**名無しさん＠お腹いっぱい。** · 2013/12/09(月) 23:39:12.96

>>966
うはｗ
>>967 の報告で話盛ったのが即バレしてるｗｗ
だっさー

**名無しさん＠お腹いっぱい。** · 2013/12/10(火) 04:15:12.92

>>941のだと grep とかの compilation-start を使う他の関数まで影響が出るので書き換えた
(dolist (func '(compile recompile))
(eval `(defadvice ,func (around ,(intern (format "%s-silently" func)) activate)
"エラー発生時のみ *compilation* バッファ表示"
(cl-letf (((symbol-function 'display-buffer) 'ignore)
((symbol-function 'set-window-start) 'ignore)
((symbol-function 'set-window-point) 'ignore))
(let (compilation-start-hook) ; local hook ではなく compile のみの hook
(add-hook 'compilation-start-hook
(lambda (proc)
(make-local-variable 'compilation-finish-functions)
(add-hook 'compilation-finish-functions
(lambda (buffer msg)
(with-current-buffer buffer
(font-lock-mode -1)
(font-lock-fontify-buffer)
(font-lock-mode 1)
(if (or (not (string-match "finished" msg))
(text-property-not-all (point-min) (point-max)
'compilation-message nil))
(display-buffer buffer)
(when (get-buffer-window buffer)
(delete-window (get-buffer-window buffer))))))
)))
ad-do-it))))
)

**名無しさん＠お腹いっぱい。** · 2013/12/11(水) 10:11:26.40

ゴミはってんじゃねえよ

**名無しさん＠お腹いっぱい。** · 2013/12/11(水) 18:53:48.05

add-hook とか設定を書き換えたときに
設定を有効にするにはどうしたらいいの
再起動するしかないかな

**名無しさん＠お腹いっぱい。** · 2013/12/11(水) 19:03:51.74

add-hookしたらすぐ有効なんじゃね?

**名無しさん＠お腹いっぱい。** · 2013/12/11(水) 19:10:21.42

eval-region したり eval-last-sexp したりすればいいのでは。

**名無しさん＠お腹いっぱい。** · 2013/12/11(水) 19:16:04.18

>>972 >>973
どうもうまくいかないのさ
みんなうまくいってるの

global-set-key とかならうまくいくけども

**名無しさん＠お腹いっぱい。** · 2013/12/11(水) 19:37:29.60

言葉が足りてない気がする。

**971** · 2013/12/11(水) 19:42:05.14

例えば local-set-key とか書き換えて評価しても
反映されないんだけど

**名無しさん＠お腹いっぱい。** · 2013/12/11(水) 19:53:45.41

(local-set-key (kbd "<f11>") "hello")

これを scratch バッファで eval-last-sexp で評価して f11 押して hello ってはいらんのなら
なんか余計な設定してるんだろ

**名無しさん＠お腹いっぱい。** · 2013/12/11(水) 19:57:20.85

add-hook は run-hooks とかで実行されない限り有効にならんから
たとえば c-mode-hook になんか追加してもすでに c-mode になってるバッファでは何も起きないよ。
ファイル開き直すなり再度 c-mode にし直すなりしないと run-hooks が働かない。

local-set-key はしらん。目的のバッファじゃなくて init.el 開いてるバッファで eval してるってオチじゃないの。

**名無しさん＠お腹いっぱい。** · 2013/12/11(水) 23:44:15.71

>>976
具体的に。

**971** · 2013/12/12(木) 11:37:11.49

local-set-key のやつは
ファイル開き直すのでうまくいきました
以前にどうやってもうまく行かないケースがあって
質問しようと思ってたのを忘れてしまった
どうもありがとう

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

init.el で eval してたってオチか

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

Emacsでテキストをマウスクリック、またはテキスト上でEnterし特定の関数を実行させたいです。
set-text-properties等でイベント別に実行させたりできるのでしょうか？
または別に専用の関数等あるのでしょうか？

**名無しさん＠お腹いっぱい。** · 2013/12/12(木) 21:22:38.38

>>982
お察しの通り、set-text-properties で指定したテキストに対して専用のキーバインドを設定できる。
そこで return なり mouse-1-down なりに好きな関数を設定してやれば ok。

http://www.gnu.org/software/emacs/manual/html_mono/elisp.html#Clickable-Text
http://www.gnu.org/software/emacs/manual/html_mono/elisp.html#Special-Properties

あたり参考に。

**名無しさん＠お腹いっぱい。** · 2013/12/12(木) 21:55:15.46

>>983
ありがとうございます!
英語は苦手ですが参考にしてやってみます

**名無しさん＠お腹いっぱい。** · 2013/12/13(金) 17:58:25.68

http://emacsrocks.com/e13.html
やべー凄過ぎて脱糞した
俺もこうなりたい

**名無しさん＠お腹いっぱい。** · 2013/12/13(金) 19:17:13.70

そりゃ見た目にハデで効率あがるのも認めるけど
やってることはマークと正規表現とquery-replaceを縦横に使いこなすっつー
emacs使いにとっちゃ息をするほどの操作と同じことだろ

**名無しさん＠お腹いっぱい。** · 2013/12/13(金) 19:22:31.50

emacs使いっていうか大抵のエディタ使ってる奴はそれぐらいのことするわな。
multiple-cursor ってなんかズレたらどうしようってイメージしかないんだよな

**名無しさん＠お腹いっぱい。** · 2013/12/14(土) 00:43:18.79

もちろん普通のEmacserは関数内とかでC-M-hでリージョン選択してquery-replaceをするだろうね
それとC-x r tかな
ただ、インパクトは凄いんで multiple-cursor を暫く使ってみる事にするよ

**名無しさん＠お腹いっぱい。** · 2013/12/14(土) 03:05:44.32

cua-mode で満足してたのに、また面白そうなもの教えてくれやがって・・・

**名無しさん＠お腹いっぱい。** · 2013/12/14(土) 10:26:26.39

cua といえば C-S-space の cua-toggle-global-mark ってあんまり使われてなさそう

**名無しさん＠お腹いっぱい。** · 2013/12/14(土) 13:14:07.36

代用はあるけど
単純にかっけえなあw

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

>>990
cuaモードを使ってるけど、cua-toggle-global-markは使ったことなかった。
今使ってみたけどあらかじめペースト先を指定しておく位の使い方しか分からなかった。
何か便利な使い方があったら教えてくれ。

**名無しさん＠お腹いっぱい。** · 2013/12/14(土) 16:30:21.76

連番を指定回数分バッファに出力する何かいい方法はないでしょうか
1
2
3
4
5
こういう風に各行に一つずつ出したいです

**名無しさん＠お腹いっぱい。** · 2013/12/14(土) 16:35:39.39

rectangle-number-lines

**名無しさん＠お腹いっぱい。** · 2013/12/14(土) 16:46:24.23

>>992
ぶっちゃけそれぐらいじゃない？
multiple-cursor みたいにへえーおもしれーって一回触っておわる系。

**名無しさん＠お腹いっぱい。** · 2013/12/14(土) 17:32:26.95

C-u M-! seq 1 5

**993** · 2013/12/14(土) 17:33:10.84

>>994
ありがとうございます。その関数を使えばリージョンの各行に数値を挿入できることを確認しました。
ですが指定した個数を挿入することはできないようです。
(defun test (start end)
(loop for i from start to end do (insert (concat (number-to-string i) "
"))))

(test 1 10)のように始まりと終わりの数値を指定すればそれを一気に挿入するのが理想ですが
そのようなものがあれば知りたいです。

あとlispの書き方でつまずいたのですがdefunの引数に&optionalを指定したとき、デフォルトの値を設定することはできませんか？
上の例だとstartの既定値を1にしたいと思ったのですが、やり方が分かりませんでした。

**993** · 2013/12/14(土) 17:34:22.77

>>996
ばっちりです！ありがとうございます！

**名無しさん＠お腹いっぱい。** · 2013/12/14(土) 17:36:46.70

Emacs Part 44
http://toro.2ch.net/test/read.cgi/unix/1387010164/

**名無しさん＠お腹いっぱい。** · 2013/12/14(土) 20:29:30.22

おらー！

**１００１** · Over 1000

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