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

[Miles Bader]

Index: emacs/lisp/printing.el
diff -c emacs/lisp/printing.el:1.2 emacs/lisp/printing.el:1.3
*** emacs/lisp/printing.el:1.2  Fri Feb  7 18:10:24 2003
--- emacs/lisp/printing.el      Mon Mar  3 15:03:18 2003
***************
*** 1,6 ****
  ;;; printing.el --- printing utilities
  
! ;; Copyright (C) 2000, 2001, 2002
  ;; Free Software Foundation, Inc.
  
  ;; Author: Vinicius Jose Latorre <address@hidden>
--- 1,6 ----
  ;;; printing.el --- printing utilities
  
! ;; Copyright (C) 2000, 2001, 2002, 2003
  ;; Free Software Foundation, Inc.
  
  ;; Author: Vinicius Jose Latorre <address@hidden>
***************
*** 2344,2358 ****
         ,@body
         (kill-buffer temp))))
  
- (eval-and-compile
- (defun pr-get-symbol (name)
-   ;; Recent versions of easy-menu downcase names before interning them.
-   (and (fboundp 'easy-menu-name-match)
-        (setq name (downcase name)))
-   (or (intern-soft name)
-       (make-symbol name)))
- )
- 
  
  (defsubst pr-visible-p (key)
    (memq key pr-visible-entry-list))
--- 2344,2349 ----
***************
*** 2371,2376 ****
--- 2362,2374 ----
  
  
  (eval-and-compile
+   (defun pr-get-symbol (name)
+     ;; Recent versions of easy-menu downcase names before interning them.
+     (and (fboundp 'easy-menu-name-match)
+        (setq name (downcase name)))
+     (or (intern-soft name)
+       (make-symbol name)))
+ 
    (cond
     ((eq ps-print-emacs-type 'emacs)   ; GNU Emacs
      (defsubst pr-region-active-p ()