summaryrefslogtreecommitdiff
path: root/lisp/menu-bar.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-07-18 20:51:00 +0000
committerRichard M. Stallman <rms@gnu.org>1995-07-18 20:51:00 +0000
commitaebb158256376b60f3dfe8df57665d0a8d4b22cd (patch)
treec2ef3cb84c5d5318d92d04e4725d3b04ab000feb /lisp/menu-bar.el
parentd6401cb1844d5642977aa258d3df17960ae436bf (diff)
downloademacs-aebb158256376b60f3dfe8df57665d0a8d4b22cd.tar.gz
(menu-bar-tools-menu): Don't define gnus entry if no network support.
Diffstat (limited to 'lisp/menu-bar.el')
-rw-r--r--lisp/menu-bar.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 56903cd6c27..ae6e07095f2 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -53,7 +53,8 @@
(define-key menu-bar-tools-menu [calendar] '("Display Calendar" . calendar))
(define-key menu-bar-tools-menu [rmail] '("Read Mail" . rmail))
-(define-key menu-bar-tools-menu [gnus] '("Read Net News" . gnus))
+(if (fboundp 'open-network-stream)
+ (define-key menu-bar-tools-menu [gnus] '("Read Net News" . gnus)))
(define-key menu-bar-tools-menu [separator-vc]
'("--"))