lisp/newcomment.el (uncomment-region-default): Remove unused binding.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5cb9afc1311a9774c64468237b81108cf09734f4..af4d233e2d61405d00099f8ad5049bae78f77b2e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2012-02-21  Juanma Barranquero  <lekktu@gmail.com>
+
+       * newcomment.el (uncomment-region-default): Remove unused binding.
+
 2012-02-21  Glenn Morris  <rgm@gnu.org>
 
        * textmodes/picture.el (picture-motion, picture-motion-reverse)

diff --git a/lisp/newcomment.el b/lisp/newcomment.el
index 16282af6409a8d521210edda220464f8c3250b95..41b5041ded56b286e6b0c346c041bac931449c92 100644 (file)
--- a/lisp/newcomment.el
+++ b/lisp/newcomment.el
@@ -224,7 +224,7 @@ ALIGN specifies that the `comment-end' markers should be aligned.
      /* 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 @@ comment markers."
          (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))