summaryrefslogtreecommitdiff
path: root/lisp/menu-bar.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2009-09-03 06:54:57 +0000
committerGlenn Morris <rgm@gnu.org>2009-09-03 06:54:57 +0000
commit597e2240abb69d6d1dc7cf72350575f8e871b8e4 (patch)
tree364a3fd7e1ea2401b1d8e6a936dbf74ee8a563c9 /lisp/menu-bar.el
parent99b195c851fef3b843917001bb621879f5396e71 (diff)
downloademacs-597e2240abb69d6d1dc7cf72350575f8e871b8e4.tar.gz
Use default-value rather than default-enable-multibyte-characters.
Diffstat (limited to 'lisp/menu-bar.el')
-rw-r--r--lisp/menu-bar.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 24fd88e6819..8833021a8cc 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -982,7 +982,7 @@ mail status in mode line"))
(list 'menu-item "Mule (Multilingual Environment)" mule-menu-keymap
;; Most of the MULE menu actually does make sense in unibyte mode,
;; e.g. language selection.
-;;; ':visible 'default-enable-multibyte-characters
+;;; :visible '(default-value 'enable-multibyte-characters)
))
;(setq menu-bar-final-items (cons 'mule menu-bar-final-items))
;(define-key menu-bar-options-menu [preferences]
@@ -1354,18 +1354,18 @@ mail status in mode line"))
(define-key menu-bar-describe-menu [mule-diag]
'(menu-item "Show All of Mule Status" mule-diag
- :visible default-enable-multibyte-characters
+ :visible (default-value 'enable-multibyte-characters)
:help "Display multilingual environment settings"))
(define-key menu-bar-describe-menu [describe-coding-system-briefly]
'(menu-item "Describe Coding System (Briefly)"
describe-current-coding-system-briefly
- :visible default-enable-multibyte-characters))
+ :visible (default-value 'enable-multibyte-characters)))
(define-key menu-bar-describe-menu [describe-coding-system]
'(menu-item "Describe Coding System..." describe-coding-system
- :visible default-enable-multibyte-characters))
+ :visible (default-value 'enable-multibyte-characters)))
(define-key menu-bar-describe-menu [describe-input-method]
'(menu-item "Describe Input Method..." describe-input-method
- :visible default-enable-multibyte-characters
+ :visible (default-value 'enable-multibyte-characters)
:help "Keyboard layout for specific input method"))
(define-key menu-bar-describe-menu [describe-language-environment]
(list 'menu-item "Describe Language Environment"