xyzzyの使い方が分か ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このスレッドのURL
■項目テキスト
405:sage 07/03/12 21:23:27 hOdwmrwB0 >>404 昔自分用に作ったものなんで、要望とちがうかもしれんけど。 キーバインドは適当にあててください。 (defstruct strong mem) (defun strong-word (str) (interactive "sSTRONG : ") (save-excursion (goto-char (point-min)) (if (string= str "") (delete-text-attributes t :test #'eq :key #'strong-p) (while (scan-buffer str :regexp t :no-dup nil :tail t) (set-text-attribute (match-beginning 0) (match-end 0) (make-strong :mem str) :foreground 7 :background 8))))) (defun jump () (interactive) (let ((pt (or (find-text-attribute t :test #'eq :key #'strong-p :start (+ (point) 1)) (find-text-attribute t :test #'eq :key #'strong-p :start (point-min))))) (if pt (goto-char pt) (strong-word (read-string "STRONG : "))))) 406:名無しさん@お腹いっぱい。 07/03/13 00:50:11 NPl4oFEa0 >>405 大変失礼しました。>>404 の機能はもともと my-coloring に付属していました。 M-x coloring-enclosed-braces-string で逝けました。 作者さん他、申し訳ありません。orz
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック!
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4995日前に更新/235 KB
担当:undef