emacs - 커서가 있는 줄 전체를 comment out하기 등

;;======================================================================
;; M-; enhancement
;; Now it can comment current line when not at end of line.
;;ref: <a href="http://www.emacswiki.org/emacs/CommentingCode
;;Original" rel="nofollow">http://www.emacswiki.org/emacs/CommentingCode
;;Original</a> idea from
;;http://www.opensubscriber.com/message/emacs-devel@gnu.org/10971693.html
 
;; There is still one difference between the orginal and this one.
;; You can't align the in-line comment at end of code now.
 
(defun comment-dwim-line (&optional arg)
  "When no region active and not at end of line, comment current line; else call comment-dwim."
  (interactive "*P")
  (comment-normalize-vars)
  (if (and (not (region-active-p)) (not (looking-at "[ \t]*$")))
      (comment-or-uncomment-region (line-beginning-position) (line-end-position))
    (comment-dwim arg)))

  (global-set-key "%" 'match-paren)
    (defun match-paren (arg)
      "Go to the matching paren if on a paren; otherwise insert %."
      (interactive "p")
      (cond ((looking-at "\\s\(") (forward-list 1) (backward-char 1))
            ((looking-at "\\s\)") (forward-char 1) (backward-list 1))
            (t (self-insert-command (or arg 1)))))