From d3b0536062a7d08f17b1e0321626bd4e5ab014b1 Mon Sep 17 00:00:00 2001 From: czkmt Date: Sat, 11 Dec 1999 17:43:39 +0000 Subject: [PATCH] (gnus-offline-define-menu-and-key): Don't call too much `static-if'. --- lisp/gnus-offline.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/gnus-offline.el b/lisp/gnus-offline.el index 446dcf8..5917a64 100644 --- a/lisp/gnus-offline.el +++ b/lisp/gnus-offline.el @@ -636,7 +636,7 @@ Please check your .emacs or .gnus.el to work nnspool fine.") (funcall gnus-offline-hangup-function)) (setq gnus-offline-connected nil) (if (eq gnus-offline-news-fetch-method 'nnagent) - (funcall 'ad-Orig-gnus-agent-toggle-plugged nil)) + (ad-Orig-gnus-agent-toggle-plugged nil)) ;; Set send mail/news function to offline functions. (gnus-offline-set-offline-sendmail-function) @@ -831,9 +831,9 @@ Please check your .emacs or .gnus.el to work nnspool fine.") (if (eq gnus-offline-news-fetch-method 'nnagent) (local-set-key "\C-coe" 'gnus-agent-expire)) (static-unless (featurep 'xemacs) - (local-set-key - (static-if (eq system-type 'windows-nt) [S-mouse-2] [mouse-3]) - 'gnus-offline-popup-menu))))) + (local-set-key + (if (eq system-type 'windows-nt) [S-mouse-2] [mouse-3]) + 'gnus-offline-popup-menu))))) ;; ;; -- 1.7.10.4