# HG changeset patch # User Richard M. Stallman # Date 806100660 0 # Node ID dd342be41ef73bb9d82ba2b7034f18756937de53 # Parent d866a75c9a3c5a7ce32a73fa620b01b6aa5846f1 (menu-bar-tools-menu): Don't define gnus entry if no network support. diff -r d866a75c9a3c -r dd342be41ef7 lisp/menu-bar.el --- 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] '("--"))