
mac にスイッチしたので xyzzy から cocoa Emacs に移行中です。
やっぱり細かなところの違いで違和感を感じます。
xyzzyではC-SPACEでマークするとフリンジに目印が表示されます。地味な機能だけど何気に役に立っていたようで、なくなると寂しいものです。emacsにはないから、テキトーに書いてみました。
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defvar fringe-indicator-ol nil) | |
(defun fringe-indicator (pt bitmap) | |
(let ((s (make-string 1 ?x))) | |
(when fringe-indicator-ol (delete-overlay fringe-indicator-ol)) | |
(setq fringe-indicator-ol (make-overlay pt (1+ pt))) | |
(put-text-property 0 1 'display (list 'left-fringe bitmap) s) | |
(overlay-put fringe-indicator-ol 'before-string s))) | |
(defadvice set-mark-command (after fringe-indicator-adv activate) | |
"indicate mark-position at fringe." | |
(fringe-indicator (point) 'right-triangle)) |
参考にさせてもらったところ:fringeの使い方
にしても、最近のemacsは transient-mark-modeとか、set-mark-default-inactiveとかややこしいのがいっぱい増えてて、ちょっと困惑しました。
0 コメント :
コメントを投稿