# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1151275300 0
# Node ID e5f156e5a1b60ca8b7f2c82e31da49d18b6d2aca
# Parent  0b855b098dcd150a59c4a7286b2f4ae462a8de9b
(view-emacs-news): Declare `res' in the right let* form.

diff -r 0b855b098dcd -r e5f156e5a1b6 lisp/help.el
--- a/lisp/help.el	Sun Jun 25 22:41:31 2006 +0000
+++ b/lisp/help.el	Sun Jun 25 22:41:40 2006 +0000
@@ -346,8 +346,7 @@
 		     (directory-files data-directory nil
 				      "^NEWS\\.[0-9][-0-9]*$" nil)))
 	      (sort (delete-dups res) (lambda (a b) (string< b a)))))
-	   (current (car all-versions))
-	   res)
+	   (current (car all-versions)))
       (setq version (completing-read
 		     (format "Read NEWS for the version (default %s): " current)
 		     all-versions nil nil nil nil current))
@@ -369,7 +368,8 @@
 	 (file (cond
 		((>= vn emacs-major-version) "NEWS")
 		((< vn 18) "NEWS.1-17")
-		(t (format "NEWS.%d" vn)))))
+		(t (format "NEWS.%d" vn))))
+	 res)
     (view-file (expand-file-name file data-directory))
     (widen)
     (goto-char (point-min))