同じようにreplace-regionも修正 コード (defmacro replace-region-maker (name &optional op) `(defun ,name (beg end from to) (interactive "r\nstarget:\nswith:" :default1 replace-region-last-from :default2 replace-region-last-to) (setf replace-…

コメントをもらったので、その内容をもとに前に作ったcomment-regionなどを修正しました。 scan-bufferよりreplace-bufferを使ったほうが楽 範囲を限定するときはsave-restrictionを使ってからnarrow-to-regionを使う。 コード ;;重複を省くためのマクロ (de…

urlへのlinkを貼っておきたいときには (shell-execute <url> t) としておくとC-x C-eでurlに飛べます。</url>

xyzzyにはcolor-moccurとかないので、anythingで選択できれば便利だと思いました＞＜。 注意 anything.lが必要です。 機能 occur 渡した正規表現を含む行を表示 moccur 開いているすべてのバッファの中での渡した正規表現を含む行の表示 moccur-anything moc…

「interactive "a"」とかなどで関数の情報が見れるので、たぶんできると思うのですがその方法が分かりません＞＜。誰か教えてくだしあ＞＜

.xyzzyなどに以下を追加 ;;kill-bufferとclipboardを共有させる（selectionは使わない) (defmacro sort-beg-end (beg end) `(when (> ,beg ,end) (let ((tmp ,beg)) (setf ,beg ,end) (setf ,end tmp)))) (defmacro compound-selection-and-killbuffer (name…

http://d.hatena.ne.jp/trotr/20080728の続き 今思いついたのは以下の３つです。 (defun (beg end) (interactive "r")の挙動 listの要素の比較の方法 replace-(string|regexp)-region (defun (beg end) (interactive "r")の挙動 emacsはpointの値がbeg xyzzy…

interactive "r"を補助するマクロ (defmacro sort-beg-end (beg end) `(when (> ,beg ,end) (let ((tmp ,beg)) (setf ,beg ,end) (setf ,end tmp)))) 一番近くの関数を実行 (defun eval-last-defun () (interactive) (save-excursion (end-of-defun) (call-i…

occurが見つからないので作った。（同じ挙動じゃないけど） とりあえず、以下を満たせばいいことにした。 呼び出すときに正規表現を入力する 関数実行後bufferが２つに分割される。 片方のbufferには与えた正規表現を含む行の内容が出力されている。 カーソ…

必要なこと（あとでまとめる） download 環境変数の設定(XYZZYHOME) netinstallerのインストール caldixで解凍用のdllをインストール .xyzzyをいじる(あとでまとめる） とりあえず、現在の.xyzzy*1 (global-set-key #\F8 'lisp-mode) (global-set-key #\F12 …

コマンドプロンプトが使いにくくて嫌になったwindowsですが、そろそろ周りと同じような環境に慣れた方が良いような気がしました。そんな訳で、しばらくはwindowsを使おうと思います。 ただ、コマンドプロンプトだけでは発狂しそうになるので代替のものを探し…