(display_tool_bar_line): Skip glyphs which are too big

[gnu-emacs] / lisp / help.el

diff --git a/lisp/help.el b/lisp/help.el
index 0caf018c2e9bed07595de736d819664efbd85150..4d92f69cebdde87530663febb36b68a298b9b62f 100644 (file)
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -346,8 +346,7 @@ With argument, display info only for the selected version."
                     (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 @@ With argument, display info only for the selected version."
         (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))