08/04/18 09:16:27
>>128
あるなら俺も使いたい。
{} の方ならこれでジャンプできるけどな。
URLﾘﾝｸ(www.bookshelf.jp)
;; By an unknown contributor
(defun match-paren (arg)
"Go to the matching paren if on a paren; otherwise insert %."
(interactive "p")
(cond ((looking-at "\\s\(") (forward-list 1) (backward-char 1))
((looking-at "\\s\)") (forward-char 1) (backward-list 1))
(t (self-insert-command (or arg 1)))))
(global-set-key "%" 'go-to-paren)