# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 985040541 0
# Node ID 595b423a9b3fff31d525da422e57a7364341cbff
# Parent  61f79d7bd19fabdf0ed9e5c7f26dede649b963bc
(mode-line-mode-menu): `glasses-mode' might be unbound.
(completion-ignored-extensions): Remove duplicate ".class".

diff -r 61f79d7bd19f -r 595b423a9b3f lisp/bindings.el
--- a/lisp/bindings.el	Mon Mar 19 18:50:47 2001 +0000
+++ b/lisp/bindings.el	Mon Mar 19 22:22:21 2001 +0000
@@ -324,7 +324,7 @@
 	      :button (:toggle . highlight-changes-mode)))
 (define-key mode-line-mode-menu [glasses-mode]
   `(menu-item ,(purecopy "Glasses") glasses-mode
-	      :button (:toggle . glasses-mode)))
+	      :button (:toggle . (bound-and-true-p glasses-mode))))
 (define-key mode-line-mode-menu [hide-ifdef-mode]
   `(menu-item ,(purecopy "Hide ifdef") hide-ifdef-mode
 	      :button (:toggle . (bound-and-true-p hide-ifdef-mode))))
@@ -414,8 +414,6 @@
 	 ".x86f" ".sparcf"
 	 ;; Libtool
 	 ".lo" ".la"
-	 ;; Java
-	 ".class"
 	 ;; Texinfo-related
 	 ".toc" ".log" ".aux"
 	 ".cp" ".fn" ".ky" ".pg" ".tp" ".vr"