diff options
| author | Richard M. Stallman | 1995-07-18 20:51:00 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-07-18 20:51:00 +0000 |
| commit | 231e734dd53a07b2fe0f52845834284a58a589a7 (patch) | |
| tree | f823e7da0c81fe9130c7be04b888ccc2ac378174 | |
| parent | f804f4e445fb0a827f57fb066a86d18038ebe74f (diff) | |
| download | emacs-231e734dd53a07b2fe0f52845834284a58a589a7.tar.gz emacs-231e734dd53a07b2fe0f52845834284a58a589a7.zip | |
(menu-bar-tools-menu): Don't define gnus entry if no network support.
| -rw-r--r-- | lisp/menu-bar.el | 3 |
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 @@ | |||
| 53 | 53 | ||
| 54 | (define-key menu-bar-tools-menu [calendar] '("Display Calendar" . calendar)) | 54 | (define-key menu-bar-tools-menu [calendar] '("Display Calendar" . calendar)) |
| 55 | (define-key menu-bar-tools-menu [rmail] '("Read Mail" . rmail)) | 55 | (define-key menu-bar-tools-menu [rmail] '("Read Mail" . rmail)) |
| 56 | (define-key menu-bar-tools-menu [gnus] '("Read Net News" . gnus)) | 56 | (if (fboundp 'open-network-stream) |
| 57 | (define-key menu-bar-tools-menu [gnus] '("Read Net News" . gnus))) | ||
| 57 | 58 | ||
| 58 | (define-key menu-bar-tools-menu [separator-vc] | 59 | (define-key menu-bar-tools-menu [separator-vc] |
| 59 | '("--")) | 60 | '("--")) |