Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r107365: lisp/newcomment.el (uncomment-region-default): Remove unused binding. ------------------------------------------------------------ revno: 107365 committer: Juanma Barranquero <lekktu@xxxxxxxxx> branch nick: trunk timestamp: Tue 2012-02-21 15:48:13 +0100 message: lisp/newcomment.el (uncomment-region-default): Remove unused binding. modified: lisp/ChangeLog lisp/newcomment.el === modified file 'lisp/ChangeLog' --- a/lisp/ChangeLog 2012-02-21 08:28:18 +0000 +++ b/lisp/ChangeLog 2012-02-21 14:48:13 +0000 @@ -1,3 +1,7 @@ +2012-02-21 Juanma Barranquero <lekktu@xxxxxxxxx> + + * newcomment.el (uncomment-region-default): Remove unused binding. + 2012-02-21 Glenn Morris <rgm@xxxxxxx> * textmodes/picture.el (picture-motion, picture-motion-reverse) === modified file 'lisp/newcomment.el' --- a/lisp/newcomment.el 2012-02-17 15:44:32 +0000 +++ b/lisp/newcomment.el 2012-02-21 14:48:13 +0000 @@ -224,7 +224,7 @@ /* bli */ if `comment-end' is empty, this has no effect, unless EXTRA is also set, in which case the comment gets wrapped in a box. - + EXTRA specifies that an extra line should be used before and after the region to comment (to put the `comment-end' and `comment-start'). e.g. in C it comments regions as @@ -872,8 +872,8 @@ (when (and sre (looking-at (concat "\\s-*\n\\s-*" srei))) (goto-char (match-end 0))) (if (null arg) (delete-region (point-min) (point)) - (let* ((opoint (point-marker)) - (nchar (skip-syntax-backward " "))) + (let ((opoint (point-marker))) + (skip-syntax-backward " ") (delete-char (- numarg)) (unless (and (not (bobp)) (save-excursion (goto-char (point-min)) _______________________________________________ Emacs-diffs mailing list Emacs-diffs@xxxxxxx https://lists.gnu.org/mailman/listinfo/emacs-diffs |