emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r112654: Silence printing.el compilat


From: Glenn Morris
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r112654: Silence printing.el compilation
Date: Tue, 21 May 2013 09:13:08 -0700
User-agent: Bazaar (2.6b2)

------------------------------------------------------------
revno: 112654
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Tue 2013-05-21 09:13:08 -0700
message:
  Silence printing.el compilation
  
  * lisp/printing.el (pr-menu-bar): Define when compiling.
modified:
  lisp/ChangeLog
  lisp/printing.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-05-21 15:43:06 +0000
+++ b/lisp/ChangeLog    2013-05-21 16:13:08 +0000
@@ -1,5 +1,7 @@
 2013-05-21  Glenn Morris  <address@hidden>
 
+       * 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.

=== modified file 'lisp/printing.el'
--- a/lisp/printing.el  2013-01-11 23:08:55 +0000
+++ b/lisp/printing.el  2013-05-21 16:13:08 +0000
@@ -1342,6 +1342,10 @@
 ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; 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 @@
   (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.


reply via email to

[Prev in Thread] Current Thread [Next in Thread]