From 794580385a6a7a0555d4c6a76176c59b8a535d2b Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 21 May 2013 09:13:08 -0700 Subject: [PATCH] Silence printing.el compilation * lisp/printing.el (pr-menu-bar): Define when compiling. --- lisp/ChangeLog | 2 ++ lisp/printing.el | 7 ++++--- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fdc0c586491..1aaf0a5fa80 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2013-05-21 Glenn Morris + * printing.el (pr-menu-bar): Define when compiling. + * mail/rmail.el (speedbar): No need to load when compiling. (speedbar-make-specialized-keymap, speedbar-with-attached-buffer) (speedbar-do-function-pointer): Declare. diff --git a/lisp/printing.el b/lisp/printing.el index bf50aa8f679..18b2b89363b 100644 --- a/lisp/printing.el +++ b/lisp/printing.el @@ -1342,6 +1342,10 @@ Used by `pr-menu-bind' and `pr-update-menus'.") ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; GNU Emacs Definitions +(eval-and-compile + (unless (featurep 'xemacs) + (defvar pr-menu-bar nil + "Specify Printing menu-bar entry."))) (cond ((featurep 'xemacs) ; XEmacs @@ -1372,9 +1376,6 @@ Used by `pr-menu-bind' and `pr-update-menus'.") (defun pr-menu-char-width () (frame-char-width)) - (defvar pr-menu-bar nil - "Specify Printing menu-bar entry.") - ;; GNU Emacs ;; Menu binding ;; Replace existing "print" item by "Printing" item. -- 2.39.2