[Emacs-diffs] Changes to emacs/lisp/printing.el,v

[Vinicius Jose Latorre]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Vinicius Jose Latorre <viniciusjl>      07/08/03 13:52:35

Index: printing.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/printing.el,v
retrieving revision 1.46
retrieving revision 1.47
diff -u -b -r1.46 -r1.47
--- printing.el 26 Jul 2007 05:26:31 -0000      1.46
+++ printing.el 3 Aug 2007 13:52:35 -0000       1.47
@@ -6,11 +6,11 @@
 ;; Author: Vinicius Jose Latorre <address@hidden>
 ;; Maintainer: Vinicius Jose Latorre <address@hidden>
 ;; Keywords: wp, print, PostScript
-;; Version: 6.9
+;; Version: 6.9.1
 ;; X-URL: http://www.emacswiki.org/cgi-bin/wiki/ViniciusJoseLatorre
 
-(defconst pr-version "6.9"
-  "printing.el, v 6.9 <2007/02/11 vinicius>
+(defconst pr-version "6.9.1"
+  "printing.el, v 6.9.1 <2007/08/02 vinicius>
 
 Please send all bug fixes and enhancements to
        Vinicius Jose Latorre <address@hidden>
@@ -1025,8 +1025,9 @@
 ;;; Code:
 
 
-(require 'lpr)
-(require 'ps-print)
+(eval-when-compile
+  (require 'lpr)
+  (require 'ps-print))
 
 
 (and (string< ps-print-version "6.6.4")
@@ -1306,7 +1307,7 @@
   (defalias 'pr-f-read-string        'read-string)
 
   ;; GNU Emacs
-  (defvar deactivate-mark nil)
+  (defvar deactivate-mark)
 
   ;; GNU Emacs
   (defun pr-keep-region-active ()
@@ -1326,7 +1327,6 @@
 
   ;; GNU Emacs
   ;; Menu binding
-  (require 'easymenu)
   ;; Replace existing "print" item by "Printing" item.
   ;; If you're changing this file, you'll load it a second,
   ;; third... time, but "print" item exists only in the first load.
@@ -1335,6 +1335,7 @@
      ;; GNU Emacs 20
      ((< emacs-major-version 21)
       (defun pr-global-menubar (pr-menu-spec)
+       (require 'easymenu)
        (easy-menu-change '("tools") "Printing" pr-menu-spec pr-menu-print-item)
        (when pr-menu-print-item
          (easy-menu-remove-item nil '("tools") pr-menu-print-item)
@@ -1345,6 +1346,7 @@
      ;; GNU Emacs 21 & 22
      (t
       (defun pr-global-menubar (pr-menu-spec)
+       (require 'easymenu)
        (let ((menu-file (if (= emacs-major-version 21)
                             '("menu-bar" "files") ; GNU Emacs 21
                           '("menu-bar" "file")))) ; GNU Emacs 22 or higher
@@ -6017,9 +6019,10 @@
 ;; Printing Interface (inspired on ps-print-interface.el)
 
 
-(require 'widget)
-(require 'wid-edit)
-(require 'cus-edit)
+(eval-when-compile
+  (require 'cus-edit)
+  (require 'wid-edit)
+  (require 'widget))
 
 
 (defvar pr-i-window-configuration nil)