# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1044659424 0
# Node ID 31cb523592a1922674418fc15cfa35789154b240
# Parent  4dd9a6db81d7f0b836d1b982c489ec61767b2ac3
(pr-get-symbol): Define during compile.

diff -r 4dd9a6db81d7 -r 31cb523592a1 lisp/printing.el
--- a/lisp/printing.el	Fri Feb 07 21:47:21 2003 +0000
+++ b/lisp/printing.el	Fri Feb 07 23:10:24 2003 +0000
@@ -2344,13 +2344,14 @@
        ,@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)