# HG changeset patch
# User Vinicius Jose Latorre <viniciusjl@ig.com.br>
# Date 1046721798 0
# Node ID 0ee18dc00572afad6721bca56261fb4383ac3f6e
# Parent  03e0aadb68a0060834702303ebdcb3cbe99091cf
vinicius: copyright date fix. Move pr-get-symbol into eval-and-compile.

diff -r 03e0aadb68a0 -r 0ee18dc00572 lisp/printing.el
--- a/lisp/printing.el	Mon Mar 03 19:55:10 2003 +0000
+++ b/lisp/printing.el	Mon Mar 03 20:03:18 2003 +0000
@@ -1,6 +1,6 @@
 ;;; printing.el --- printing utilities
 
-;; Copyright (C) 2000, 2001, 2002
+;; Copyright (C) 2000, 2001, 2002, 2003
 ;; Free Software Foundation, Inc.
 
 ;; Author: Vinicius Jose Latorre <vinicius@cpqd.com.br>
@@ -2344,15 +2344,6 @@
        ,@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))
@@ -2371,6 +2362,13 @@
 
 
 (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 ()