|
发表于 2006-11-7 21:59:20
|
显示全部楼层
很好玩. Emacs里可以这样:
(defun cowsay (start end)
(interactive "r")
(shell-command-on-region start end "cowsay" nil t)
(let ((cs (progn (backward-paragraph) (point)))
(ce (progn (forward-paragraph) (point))))
(comment-region cs ce))) |
|