トップページunix
1002コメント322KB

Emacs Part 49 [無断転載禁止]©5ch.net

■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん@お腹いっぱい。2015/12/11(金) 17:55:35.35
前スレが落ちていたみたいなので。

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

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

前スレ
Emacs Part 48
http://peace.2ch.net/test/read.cgi/unix/1429172451/
0281名無しさん@お腹いっぱい。2016/02/29(月) 22:08:37.52
>>278
ありがとうございます!
こんなの求めてました!
0282名無しさん@お腹いっぱい。2016/03/02(水) 20:18:42.94
本当に病気で更新途絶えたな
0283名無しさん@お腹いっぱい。2016/03/03(木) 07:02:42.62
>>280
カーソル分身って何か混乱しそうな気がして使ってなかったけど便利ですね。
cua-modeの出番が連番付ける時くらいになってしまった。
0284名無しさん@お腹いっぱい。2016/03/03(木) 13:31:08.17
multiple-cursorsを使うと、もうemacs以外使えなくなる
0285名無しさん@お腹いっぱい。2016/03/03(木) 13:32:58.87
それで検索するとvim pluginというのも引っかかるね
0286名無しさん@お腹いっぱい。2016/03/03(木) 19:37:12.19
というかsublimeだろ、もともと
0287名無しさん@お腹いっぱい。2016/03/03(木) 22:50:56.28
新しめの拡張はどっかの移植のバターンが多いイメージ
0288名無しさん@お腹いっぱい。2016/03/03(木) 23:19:54.89
vimの方のマルチカーソルは速度遅いからvimの中では別の方法取るよ
originは上にもあるとおりsublime
0289名無しさん@お腹いっぱい。2016/03/04(金) 02:23:23.95
俺も入れてみたけど mc いいな
0290名無しさん@お腹いっぱい。2016/03/04(金) 04:17:37.56
mc/region-strings が期待してたものと違ったのでこんなの作ってみました

(defun my-mc/all-region-strings ()
(let* (strings
(cursors (mc/all-fake-cursors))
(tmp-list (and cursors
(let ((lst (list (list (mark) (buffer-substring-no-properties (point) (mark))))))
(mapc #'(lambda (x)
(let* ((beg (mc/cursor-beg x))
(end (mc/cursor-end x))
(str (buffer-substring-no-properties beg end)))
(setq lst (append lst (list (list end str))))))
cursors)
lst))))
(when tmp-list
(setq tmp-list (sort tmp-list #'(lambda (a b) (< (car a) (car b)))))
(mapc #'(lambda (x)
(setq strings (append strings (list (car (cdr x))))))
tmp-list))
strings))
0291名無しさん@お腹いっぱい。2016/03/04(金) 11:52:26.63
grep結果を見やすくするため、org-modeとmarkdownのリンクを消すコードを作りました。
grepに引き続いて自動実行させたいのですが、hookの方法を教えていただけませんか。
0292名無しさん@お腹いっぱい。2016/03/04(金) 12:23:51.59
マルチすんなよ
0293名無しさん@お腹いっぱい。2016/03/04(金) 16:42:30.35
multiple-cursorsを使う場合は↓これを使うと便利になる
(define-key isearch-mode-map [(control ? )] (lambda ()
(interactive)
(push-mark isearch-other-end t 'activate)
(isearch-exit)))
isearchで検索してハイライトさせた後C-スペースでリージョンに変更できる
そんでmcする
0294名無しさん@お腹いっぱい。2016/03/05(土) 00:32:23.25
>>293
mcする時はC-SPCも省略したいです
0295名無しさん@お腹いっぱい。2016/03/05(土) 15:11:01.67
>>294
>>293のはmc専用って訳じゃないからこれはこれで残しておいて↓を別途追加した
isearch中にC-<で一気にmcに移行出来てスゲー便利だった
(define-key isearch-mode-map [(control <)] (lambda ()
(interactive)
(push-mark isearch-other-end t 'activate)
(isearch-exit)
(setq this-original-command 'ignore)
(mc/mark-all-like-this)))

this-original-commandを設定してるのは、mcが直前のコマンドを厳密にチェックしてて
そのまま実行すると妙なエラーになるから、回避するイディオムみたいなもんだな
最初だけignoreを登録するか聞かれるけどyで登録しておけば2回目からはスッと実行できる
0296名無しさん@お腹いっぱい。2016/03/05(土) 15:20:56.32
みんな知ってるかもしれないけど一応mcの便利技
mc中にC-v,M-vでカーソル間を移動出来てC-'をすればカーソル以外の行を非表示に出来る
C-v,M-vはリング状にぐるぐる回り続けて気持ち悪いから
(setq mc/cycle-looping-behaviour 'error)をしてる
これしておけば上端と下端でカツっと止まる
0297名無しさん@お腹いっぱい。2016/03/05(土) 15:28:15.18
連投スマンが>>290はどういう事だ?解説してくれ
0298名無しさん@お腹いっぱい。2016/03/05(土) 16:26:01.81
連投スマン…これでおしまいにする
>>295よりは↓の方が直感的で使いやすかったんで別バリエーションとして追加させてくれ
(define-key isearch-mode-map [(control >)] (lambda ()
(interactive)
(push-mark isearch-other-end t 'activate)
(isearch-exit)
(setq this-original-command 'ignore)
(mc/mark-next-like-this 1)))
0299名無しさん@お腹いっぱい。2016/03/05(土) 17:03:50.57
>>297
例えばこれを二行目からmcした時に
mc-0 mc-a mc-a
mc-1 mc-b mc-c
mc-2 mc-e mc-f

mc/region-strings はこういうリストを返すけど
("mc-f" "mc-e" "mc-2" "mc-c" "mc-b" "mc-0" "mc-a" "mc-1")
>>290のは見た目の順で重複もそのまま返すってだけです
("mc-0" "mc-a" "mc-a" "mc-1" "mc-b" "mc-c" "mc-2" "mc-e" "mc-f")
0300名無しさん@お腹いっぱい。2016/03/05(土) 18:07:06.05
>>299
なるほど、返答どうも!
んで、そうなると何か良いことあるの?
mcの内部に詳しいわけでもないんでよく分からん…
0301名無しさん@お腹いっぱい。2016/03/06(日) 01:09:01.39
color-moccur とか helm-swoop とか
>>276
どっちがいいのかな ^^;
0302名無しさん@お腹いっぱい。2016/03/06(日) 01:28:45.87
>>301
helm 使ってれば helm-swoop でいいだろうし
使ってなければ color-moccur でいいんじゃない
0303名無しさん@お腹いっぱい。2016/03/06(日) 02:25:14.65
>>300
1行毎に1個のリージョン群なら cua-mode や rectangle-mark-mode から
そのまま使えるとか
0304名無しさん@お腹いっぱい。2016/03/06(日) 03:33:56.90
>>296
phi-searchのぐるぐるも止められます?
せめてisearchみたいに分かりやすく「もうねえよ!」と言ってほしい。
0305名無しさん@お腹いっぱい。2016/03/06(日) 08:12:50.70
israrchがchar-foldingだのwordだのregexだのパズル過ぎる
モード切り替え間違えるとサーチ終了しちゃうし
0306名無しさん@お腹いっぱい。2016/03/06(日) 11:57:48.33
ace-jumpで飛ぶときにIME無効にするにはどうしたらいいですか。飛ぼうとすると日本語が入力されてすごくストレスです ^^;
0307名無しさん@お腹いっぱい。2016/03/06(日) 13:54:25.54
ace-jump使ってないから分からんけど
(add-hook 'ace-jump-hook 'deactivate-input-method)
みたいになんかのhookに登録すればいいんじゃないの?
0308名無しさん@お腹いっぱい。2016/03/06(日) 15:42:24.45
>>307
やってみます。ありがとう(_ _)
0309名無しさん@お腹いっぱい。2016/03/08(火) 15:17:04.44
久しぶりにここにきました。以前はお世話になりました。
今はemacsを文章を書く程度にしか使っていません。
あれから進歩がなく、逆に忘れてしまっていることが多くて
大変だなとおもっています。
以前webarchiveを使ってリンクが切れているものは読むなど
教えていただきました。では
0310名無しさん@お腹いっぱい。2016/03/08(火) 18:06:21.01
おう、また明日な
0311名無しさん@お腹いっぱい。2016/03/09(水) 01:51:23.68
いいってことよ
0312名無しさん@お腹いっぱい。2016/03/09(水) 15:55:38.76
>>304
(defun phi-search--more-matches-p (&optional prev)
(if phi-search--selection
(let* ((ovs (copy-sequence phi-search--overlays))
(p (overlay-start (nth phi-search--selection ovs)))
lst)
(setq ovs (sort ovs #'(lambda (a b) (< (overlay-start a) (overlay-start b)))))
(mapc #'(lambda (x) (setq lst (append lst (list (overlay-start x))))) ovs)
(if prev
(> p (nth 0 lst))
(< p (nth (1- (length ovs)) lst))))))

(defun ad-around--phi-search-again-or-next (f)
(if (phi-search--more-matches-p)
(funcall f)))
(advice-add 'phi-search-again-or-next :around #'ad-around--phi-search-again-or-next)

(defun ad-around--phi-search-again-or-previous (f)
(if (phi-search--more-matches-p t)
(funcall f)))
(advice-add 'phi-search-again-or-previous :around #'ad-around--phi-search-again-or-previous)
0313名無しさん@お腹いっぱい。2016/03/09(水) 21:01:22.45
use-packageでgrep-edit.elを自動インストールできるようにしたいんだけど
melpaにgrep-edit.el無いorz

こういう時はどうすればいいんすか
0314名無しさん@お腹いっぱい。2016/03/09(水) 21:41:54.77
>>313
MELPAにあるwgrepじゃ駄目なのか?
0315名無しさん@お腹いっぱい。2016/03/09(水) 21:48:57.13
wgrepで大満足でした。
ありがとうございました。
0316名無しさん@お腹いっぱい。2016/03/09(水) 22:15:07.66
melpaを更新日時順、ダウンロード順でソートしてニヤニヤしてる奴いる?
0317名無しさん@お腹いっぱい。2016/03/10(木) 02:08:26.75
ag と ag-dired に出会ってから grep とか find-dired はいらなくなった
0318名無しさん@お腹いっぱい。2016/03/10(木) 11:21:20.07
occur-by-moccurすると,カーソル上のいち文が検索ボックスに入ってしまうのですが,どうしたら止められますか?
0319名無しさん@お腹いっぱい。2016/03/10(木) 15:08:10.55
emacsを立ち上げようとするとエラーがでます。
どうすればいいでしょうか?

error in process filter: Could not create connection to www.emacswiki.org:\
443
0320名無しさん@お腹いっぱい。2016/03/10(木) 16:43:54.28
-Qを与えて起動する
03213192016/03/10(木) 17:26:28.17
>>320
次のものが赤字で出ただけです
;; This buffer is for notes you don't want to save, and for Lisp evaluatio\
n.
;; If you want to create a file, visit that file with C-x C-f,
;; then enter the text in that file's own buffer.
03223192016/03/10(木) 17:44:07.25
>>320
教えてくれたことについてわかりました。
-Qを与えて起動してその画面からinit.elを開いて書き直せと
いうことなのだと理解しました。
その書き直しについてなのですが
http://d.hatena.ne.jp/shammer/20160212/p1
に書いているように
(auto-install-update-emacswiki-package-name t)
をコメントにしてしまってコードじゃないから働かなくしてしまえ、
というふうにすると、(;;と先頭につけると)エラーがでなくなりました。
こういう風にしてコメントアウトしてしまって何の問題もないのでしょうか?
どうしてこういうエラーがでるようになったのでしょうか?
なんども申しわけありません。できれば教えてください
03233192016/03/10(木) 18:07:03.88
(auto-install-update-emacswiki-package-name t)
のところを
;;(auto-install-update-emacswiki-package-name t)
としたあとに;;を削除をしたのですが、これだけでなぜだかエラーが
でなくなりました。
なぜかわかりませんが、解決しました。ありがとうございます 👀
Rock54: Caution(BBR-MD5:0be15ced7fbdb9fdb4d0ce1929c1b82f)
0324名無しさん@お腹いっぱい。2016/03/10(木) 18:14:24.89
なんどもすみません。
整理します。
http://d.hatena.ne.jp/shammer/20160216/p1
をすると解決しました。というのはbrew unlink openssl
とすることで再びエラーが出てきたからです。

他方で、その後にbrew doctorをしたところ
Warning: Some keg-only formula are linked into the Cellar.
Linking a keg-only formula, such as gettext, into the cellar with
`brew link <formula>` will cause other formulae to detect them during
the `./configure` step. This may cause problems when compiling those
other formulae.

Binaries provided by keg-only formulae may override system binaries
with other strange results.

You may wish to `brew unlink` these brews:
openssl
というのがでてきました。brew unlink opensslをするとemacsのほうで
エラーがでるし、brew unlink opensslをせずに、
http://d.hatena.ne.jp/shammer/20160216/p1
の通りにすると、brew でエラーがでます。
それでは
0325名無しさん@お腹いっぱい。2016/03/11(金) 00:39:51.51
選択範囲やそのバッファの追記保存はどうやるのだろう
#<buffer Emacs のバッファ名> >> filename

こういうのをM-x からやりたい
0326名無しさん@お腹いっぱい。2016/03/11(金) 00:44:14.31
選択範囲なら M-x append-to-file とか
バッファなら mark-whole-buffer してから append-to-file とか
0327名無しさん@お腹いっぱい。2016/03/11(金) 09:35:46.24
関数にしてみた
M-x >> でリージョンがあればその範囲、なければバッファ全体を追記

(defun >> (beg end)
(interactive
0328名無しさん@お腹いっぱい。2016/03/11(金) 09:38:23.38
あれ?今度は書けたかな

(defun >> (beg end)
(interactive "r")
(let* ((urp (use-region-p))
(beg (or (and urp beg) (point-min)))
(end (or (and urp end) (point-max)))
(prompt (format "%s >> " (if urp
(format "region %s to %s" beg end)
(format "buffer %s" (current-buffer))))))
(append-to-file beg end (read-file-name prompt))))
0329名無しさん@お腹いっぱい。2016/03/11(金) 17:44:41.01
ありがとう。
0330名無しさん@お腹いっぱい。2016/03/12(土) 18:30:01.81
emacs 上で shell や ssh を動かして、なんでもかんでも emacs でやってきましたが、
最近、「そんなトロいエディタ使ってるから作業が遅いんだ」と言われてしまいました。

システム関係のプログラムの開発やメンテナンスで、
とにかくスピードを求められる仕事が増えてきたのですが、
どうもそういう仕事を多くしている人の目から見ると、
emacs のやりかたはトロ臭く見えるらしいのです。
(自分のやりかたがトロ臭いだけなのかもしれませんが)

vi + コンソール や、windows 上でのスクリーンエディタを使ったやりかた、
その他 Sublime や Atom 等の最新のエディタを使ったやり方に引けをとらない作業効率を
emacs で実現することは可能なのでしょうか。
0331名無しさん@お腹いっぱい。2016/03/12(土) 21:13:32.21
>>330

言語は問わず、できるだけスクリプトもしくは elisp にして
(もちろん、少々のパラメータの変更などはインタラクティブに変更可能にして)
もし elisp ならば eval-last-sexp で即座に実行可能な状態にすればいいのでは!?

多分初期段階ではめんどうでも、積み重ねると既存のものの組み合わせになっ
てくるから、めんどうさが減ってくるのでは。
0332名無しさん@お腹いっぱい。2016/03/12(土) 22:16:34.26
デフォルト設定のemacsで
↓キー押しっぱなしのカーソル移動で画面をスクロールしてるのを
見せたりしたんだろうな
0333名無しさん@お腹いっぱい。2016/03/13(日) 01:09:18.24
がんばって応援してる
0334名無しさん@お腹いっぱい。2016/03/13(日) 01:20:38.90
女とエディタは少しトロいぐらいの方がええんやで
0335名無しさん@お腹いっぱい。2016/03/13(日) 08:42:21.84
>>332
流石にそれはないだろ
C-n
に違いない
0336名無しさん@お腹いっぱい。2016/03/13(日) 10:59:42.22
El CapitanのTerminalでEmacs動かした時ControlキーとShiftキーを使ったバインドが反応しないんですが回避方法ありますか?
"C-M-%"とか効かないんですぅ
0337名無しさん@お腹いっぱい。2016/03/13(日) 14:42:37.87
>>330を見てるとEmacsのやり方がとろいのかEmacsの動作速度がとろいのか分からんな

ちなみにTypeScriptとかLLVMとかはコンパイラ内にソース解析機能があって
それ使うとEmacsでもバリバリ補完が効くようになって超便利

今時はコンパイラ側にソース解析機能を載せるのが流行りだから
エディタに文句言ってるやつの方が遅れてる

要するに何でも受け入れられる懐の深いエディタのEmacsこそが
一週回って最先端のエディタと言える
0338名無しさん@お腹いっぱい。2016/03/13(日) 15:22:57.26
トロい女も割となんでも受け入れてくれるしな
0339名無しさん@お腹いっぱい。2016/03/13(日) 18:58:51.97
emacsなんか使ってて遅いって
コマンドラインでガシガシ仕事する真性のUNIX使いに言われてんのかと思ったら
ただのエディタ論争かよw
こんなの言ってるヤツらも素人に毛の生えた程度だぞw
0340名無しさん@お腹いっぱい。2016/03/13(日) 19:03:40.14
じゃあユニケージとか言ってる奴がUNIXの達人で最速クラスなの?
0341名無しさん@お腹いっぱい。2016/03/13(日) 19:33:20.30
最速かどうかは知らんが
ウィンドウシステムなんて入れませんがなにか?っていう
ガチすぎるサーバ数十〜数百台の面倒見るような仕事なら
好むと好まざるとに関わらず達人になるだろうよ
0342名無しさん@お腹いっぱい。2016/03/13(日) 20:41:56.47
>>337
ダイナミックロードのサポートしたのは良いけど、gpl_compatibleとシグネチャー要求する懐ろの狭さはなんとかならんかね

大昔のPC98思い出して呆れたわ
0343名無しさん@お腹いっぱい。2016/03/13(日) 21:06:28.08
ダイナミックローディングなんか入れて
emacsがウェブブラウザ並のマルウェア蔓延アプリと化すのに
リーチかかってるだろ
シグネチャくらい当然
0344名無しさん@お腹いっぱい。2016/03/14(月) 02:44:26.88
つうか sublime や atom てそんなに捗るもんなのか
0345名無しさん@お腹いっぱい。2016/03/14(月) 03:27:27.91
Lispの勉強しなくても使えるからな
0346名無しさん@お腹いっぱい。2016/03/14(月) 08:30:10.77
>>343
そういう理由じゃないから
0347名無しさん@お腹いっぱい。2016/03/14(月) 10:37:21.21
このスレの大部分の人もelispしらないじゃん

web関連で使ってるとsublimeのほうが便利なことはよくあるかな
0348名無しさん@お腹いっぱい。2016/03/14(月) 12:19:43.33
ならそれ使えばいいだろ
さよなら
0349名無しさん@お腹いっぱい。2016/03/14(月) 13:07:19.52
elisp書けないのにemacs使ってたらそりゃトロく見られるし実際トロい奴だわ
0350名無しさん@お腹いっぱい。2016/03/14(月) 16:44:34.82
いいんだよ、これからできるようになるから ^p^
0351名無しさん@お腹いっぱい。2016/03/14(月) 20:33:43.33
非常に前向きでよろしい
0352名無しさん@お腹いっぱい。2016/03/16(水) 23:17:40.99
マ イ ン ド コ ン ト ロ ー ル の手法

・沢山の人が、偏った意見を一貫して支持する
 偏った意見でも、集団の中でその意見が信じられていれば、自分の考え方は間違っているのか、等と思わせる手法

・不利な質問をさせなくしたり、不利な質問には答えない、スルーする
 誰にも質問や反論をさせないことにより、誰もが皆、疑いなど無いんだと信じ込ませる手法

偏った思想や考え方に染まっていたり、常識が通じない人間は、頭が悪いフリをしているカルト工作員の可能性が高い

靖 国 参 拝、皇 族、国 旗 国 歌、神 社 神 道を嫌う カ ル ト

10人に一人は カ ル ト か 外 国 人

「ガ ス ラ イ テ ィ ン グ」 で 検 索 を !
0353名無しさん@お腹いっぱい。2016/03/17(木) 23:25:44.88
isearch-forward で進んだ後って C-r を2回押さないと方向転換できないのは何です?
一回の C-s/C-r で行ったり来たりしたいのに。
0354名無しさん@お腹いっぱい。2016/03/18(金) 01:15:48.19
カーソルに注目
カーソルを[]で表示するとして
WORD[] ここにC-sで飛んでくる
次にC-rを押すと
[]WORD ここにカーソルが飛ぶ
なぜならばC-rは(isearch-repeat-backward)だから
0355名無しさん@お腹いっぱい。2016/03/18(金) 01:47:13.27
気にしないことだ
肩こりの原因になったりするけれども
0356名無しさん@お腹いっぱい。2016/03/18(金) 02:33:24.37
たしかにうっとおしいね ^^;
0357名無しさん@お腹いっぱい。2016/03/18(金) 04:11:10.95
マクロとか使って作業効率化するときはこの引っ掛かりが役に立ったりするよね
0358名無しさん@お腹いっぱい。2016/03/18(金) 05:29:08.04
>>353
やっつけだけど一回で戻れるようにしてみた
どや!

(defvar isearch-direction nil)
(defun isearch-check-reverse (arg)
(unless (eq arg isearch-direction)
(let ((op isearch-opoint)
(str isearch-string))
(cond
((eq arg 'backward)
(setq isearch-direction 'backward)
(isearch-backward nil 1))
((eq arg 'forward)
(setq isearch-direction 'forward)
(isearch-forward nil 1)))
(isearch-yank-string str)
(setq isearch-opoint op))))
(advice-add 'isearch-forward :before (lambda (&optional regexp-p no-recursive-edit) (setq isearch-direction 'forward)))
(advice-add 'isearch-backward :before (lambda (&optional regexp-p no-recursive-edit) (setq isearch-direction 'backward)))
(advice-add 'isearch-repeat-forward :before (lambda () (isearch-check-reverse 'forward)))
(advice-add 'isearch-repeat-backward :before (lambda () (isearch-check-reverse 'backward)))
0359名無しさん@お腹いっぱい。2016/03/18(金) 10:35:25.69
つうかこれだけでいいでしょ…
(defun isearch-repeat-backward ()
"Repeat incremental search backwards."
(interactive)
(when isearch-forward (isearch-repeat 'backward)) ; 前回がisearch-forwardなら2回繰り返す
(isearch-repeat 'backward))
isearch-repeat-forwardの方も同じようにやればいいよ
0360名無しさん@お腹いっぱい。2016/03/18(金) 10:38:26.82
無理にadvice使わなくても実質一行の関数なんだから上書きすればおk
0361名無しさん@お腹いっぱい。2016/03/18(金) 11:23:07.28
>>359
助かるわ ^^;
0362名無しさん@お腹いっぱい。2016/03/18(金) 15:12:13.02
抽象化で美しい
0363hoge2016/03/19(土) 01:06:19.71
めっちゃエラーでる orz

(defun isearch-repeat-backward ()
0364名無しさん@お腹いっぱい。2016/03/19(土) 10:21:02.95
>>363
ttp://p.twpl.jp/show/large/SG4TF
0365名無しさん@お腹いっぱい。2016/03/19(土) 11:00:50.15
どこがマズいのかおしえてください orz
(defun isearch-repeat-backward ()
"Repeat incremental search backwards."
(interactive)
;前回がisearch-forwardなら2回繰り返す
(when isearch-forward (isearch-repeat 'backward))
(isearch-repeat 'backward))

(defun isearch-repeat-forward ()
"Repeat incremental search forwards."
(interactive)
;前回がisearch-backwardなら2回繰り返す
(when isearch-backward (isearch-repeat 'forward))
(isearch-repeat 'forward))
0366名無しさん@お腹いっぱい。2016/03/19(土) 11:40:44.20
お前のそのネットの向こうにいる相手はみんなセンセイかママかなんかだと思ってる子供のようにしか見えないみっともない質問のしかた
または下から二行目
(when (not isearch-forward) (isearch-repeat 'forward))
0367名無しさん@お腹いっぱい。2016/03/19(土) 11:59:22.06
>>366
ありがとう愛してる
0368名無しさん@お腹いっぱい。2016/03/19(土) 12:30:31.47
>>367
うるせーバカ
0369名無しさん@お腹いっぱい。2016/03/20(日) 00:28:19.30
結構便利かもしれんので俺もさらす
(defun ad-isearch-repeat-quick-reverse (direction)
(when (and (not (boundp 'in-ad-isearch-repeat-quick-reverse))
(eq isearch-forward (eq direction 'backward)))
(let (in-ad-isearch-repeat-quick-reverse)
(isearch-repeat direction))))
(advice-add 'isearch-repeat :before 'ad-isearch-repeat-quick-reverse)
0370名無しさん@お腹いっぱい。2016/03/20(日) 01:32:59.01
かっこいい・・
0371名無しさん@お腹いっぱい。2016/03/20(日) 16:25:13.79
>>369
説明してよ
0372名無しさん@お腹いっぱい。2016/03/20(日) 18:07:34.94
>>371
ああすまん>>369>>353用のコード
0373名無しさん@お腹いっぱい。2016/03/20(日) 18:29:33.86
便利だからisearch-quick-reverseをnon-nilにしたら有効になるようにして本家に投げてくれ
0374名無しさん@お腹いっぱい。2016/03/21(月) 06:09:36.56
>>330
そう言ってきた奴は何使ってるの?なんの作業が遅いと言われたの?
そこを書くなりわからないなら教えてもらわないと話にならないだろ
その上でたとえばもしvimでのこういう作業だったら具体的にemacsで小効率化できないでしょうか?って聞き方しないと。
っていうかエディタの問題じゃなくてお前の仕事の進め方が悪いんじゃないのか?スレの聴き方からしてそんな臭いが漂ってる
0375名無しさん@お腹いっぱい。2016/03/21(月) 09:02:09.32
釣られクマ
0376名無しさん@お腹いっぱい。2016/03/21(月) 10:08:39.01
>>374の必死感はvim使いっぽい
0377名無しさん@お腹いっぱい。2016/03/21(月) 10:17:42.98
>>374
お前が効率悪いわ
0378名無しさん@お腹いっぱい。2016/03/21(月) 22:19:29.62
emacsはちょっと高機能なエディタって使い方から始められるのが初心者にやさしくていいです ^p^
0379名無しさん@お腹いっぱい。2016/03/22(火) 13:49:46.35
>>373
advice使ったコードがコミットされることはない
isearch-repeatを直接改良しないと駄目だと思われる

あと実際使ってるとC-rで一番上に到達したからC-sをしてポイントを単語末尾に移動させてから
Enterで終了するっていう使い方を無意識にしてる事に気付いた
quickをしてると出来ないから結局良し悪しだな
0380名無しさん@お腹いっぱい。2016/03/22(火) 18:34:25.72
>>379
上にadvice使ってないのが出てるだろ
んで、こういうのは言う通り人によってよしあしだし
旧来からのemacs使いの指グセじゃないから
変数でオンオフしてからな!とか言ったうえで誰か投げてくれとlazyなことを言ってるわけだよ
isearchはフツーのエディタによくある動作にもできるよ!
と小さいわりに益のある修正だから受け入れられやすいと思うんだけど
■ このスレッドは過去ログ倉庫に格納されています