Skip to content

Instantly share code, notes, and snippets.

@yaotti

yaotti/my-funcs.el

Created December 24, 2008 04:32
Show Gist options
  • Save yaotti/39583 to your computer and use it in GitHub Desktop.
Save yaotti/39583 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
my-funcs.el
;; 選択範囲をコメントアウト&その後ろにコメントアウトした物をペースト
(defun comment-out-and-paste ()
(interactive)
(save-excursion
(kill-ring-save (region-beginning) (region-end))
(comment-region (region-beginning) (region-end))
(goto-char (region-end))
(insert "\n\n")
(yank)
))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment