【xyzzy】検索時は選択している箇所をデフォルト表示

他のエディタみたいに検索するとき(C-s)は、選択している箇所をデフォルト表示するようにマクロを書きました。 何も選択してないときは、最後に検索した文字を表示。
(defun selct-selection () (if (get-selection-type) (buffer-substring (selection-mark) (selection-point)) ed::*last-search-string*)) (defun search-forward (pattern &optional noerror) (interactive "sSearch forward: " :default0 (selct-selection) :history0 'search) (ed::search-command pattern nil nil (interactive-p) noerror))
.xyzzyとかsiteinit.lに記述します。siteinit.lに書いた場合はいつものようにbyte-compileが必要です。 このサイトも参考に。

コメント

このブログの人気の投稿

【.NET】DataGridViewを選択した際に背景色を変更しない

Can't open PID file /var/run/nginx.pid (yet?) after start: Too many levels of symbolic links

【PostgreSQL】ROWNUMのように行番号(現在行)を取得するROW_NUMBER