こんにちは、Chibaです!
今日もネタが無さ過ぎるのでぼんやり考えたEmacs小ネタで行きます!
自分は、括弧は先に対で入力する派なのですが、先に入力するとコッカの方を後ろに移動したり前に持って行きたくなったりします。
具体的には、
(a) b c d e f
を、
(a b c d e f)
にしたくなったりするわけですね。
これは良いブログネタ!ということで早速作ってみました。
(define-key global-map [(control meta shift ?f)]
(defun forward-thesis (arg)
(interactive "p")
(when (string= ")" (thing-at-point 'char))
(delete-char 1)
(forward-sexp arg)
(insert ")")
(backward-char))))
(define-key global-map [(control meta shift ?b)]
(defun backward-thesis (arg)
(interactive "p")
(when (string= ")" (thing-at-point 'char))
(delete-char 1)
(backward-sexp arg)
(backward-char)
(insert ")")
(backward-char))))
ちょっと妙な動きもしますが、使えるようであればちゃんとしたものに作り直そうかなと思っています。
ちなみに、thesisという名前は、paren/thesisに分ける呼び方があるようなので、これから取りました。
》jargon, node: ASCII
■
