changeset 12588:dd342be41ef7

(menu-bar-tools-menu): Don't define gnus entry if no network support.
author Richard M. Stallman <rms@gnu.org>
date Tue, 18 Jul 1995 20:51:00 +0000
parents d866a75c9a3c
children 9aaf593a2be2
files lisp/menu-bar.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/menu-bar.el	Tue Jul 18 20:48:36 1995 +0000
+++ b/lisp/menu-bar.el	Tue Jul 18 20:51:00 1995 +0000
@@ -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]
   '("--"))