(defun my-comment-or-uncomment-region (beg end &optional arg)
(interactive (if (use-region-p)
(list (region-beginning) (region-end) nil)
(list (line-beginning-position)
(line-beginning-position 2))))
(comment-or-uncomment-region beg end arg)
)
(global-set-key [remap comment-or-uncomment-region] 'my-comment-or-uncomment-region)
现在Emacs的行为接近于Eclipse了,不过还是有几处细微的不同:(1)它不会像Eclipse那样,在选中多行注释的时候,把其中的空行也加上注释 (2)Eclipse的注释一律加在一行顶头的位置,而Emacs会加在相应indent对齐的位置。 当然,具体的行为方式在Emacs中肯定是可以调整的,对我来说现在Emacs的方式已经可以满足我的需要了。