(delete-trailing-whitespace): Remove extraneous let.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 044270f56b78d555f4682dc27c59c014ed0814b1..c16ab3fba57b07a666fe7dda07eca54f32a5e25c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2000-12-16  Miles Bader  <miles@gnu.org>
+
+       * simple.el (delete-trailing-whitespace): Remove extraneous let.
+
 2000-12-15  Miles Bader  <miles@gnu.org>
 
        * comint.el (comint-send-string, comint-send-region): Also accept

diff --git a/lisp/simple.el b/lisp/simple.el
index b145a4a0f928e6a8bcd896cac55120970fac047a..21118aa5c9166da8f3bd4945c56cf769b7cf8587 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -232,11 +232,10 @@ This respects narrowing, created by \\[narrow-to-region] and friends."
   (interactive "*")
   (save-match-data
     (save-excursion
-      (let (eol bol)         
       (goto-char (point-min))
       (while (re-search-forward "\\s-$" nil t)
        (skip-syntax-backward "-" (save-excursion (forward-line 0) (point)))
-       (delete-region (point) (match-end 0)))))))
+       (delete-region (point) (match-end 0))))))
 
 (defun newline-and-indent ()
   "Insert a newline, then indent according to major mode.