From 231e734dd53a07b2fe0f52845834284a58a589a7 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 18 Jul 1995 20:51:00 +0000 Subject: [PATCH] (menu-bar-tools-menu): Don't define gnus entry if no network support. --- lisp/menu-bar.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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] '("--")) -- 2.39.2