09/02/06 20:47:21 NriqglfrP
>>196
あなたの期待通りの動作をするものか解らないが…。
(defun selection-forward-paragraph (&optional (arg 1))
(interactive "p")
(ed::begin-selection)
(forward-paragraph arg))
(defun selection-backward-paragraph (&optional (arg 1))
(interactive "p")
(selection-forward-paragraph (- arg)))