17/05/07 00:35:55.43 .net
>>383
なんとかできました．ありがとうございます．
(bind-key "C-S-f" '(lambda ()
(interactive)
(if (or (bolp) (eolp))
(forward-char 10)
(progn
(save-restriction
(narrow-to-region (line-beginning-position)
(line-end-position))
(forward-char 10))))))