/[emacs]/emacs/lisp/printing.el
ViewVC logotype

Diff of /emacs/lisp/printing.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by kfstorm, Fri Feb 7 21:06:51 2003 UTC revision 1.2 by kfstorm, Fri Feb 7 23:10:24 2003 UTC
# Line 2344  See `pr-ps-printer-alist'.") Line 2344  See `pr-ps-printer-alist'.")
2344         ,@body         ,@body
2345         (kill-buffer temp))))         (kill-buffer temp))))
2346    
2347    (eval-and-compile
2348  (defun pr-get-symbol (name)  (defun pr-get-symbol (name)
2349    ;; Recent versions of easy-menu downcase names before interning them.    ;; Recent versions of easy-menu downcase names before interning them.
2350    (and (fboundp 'easy-menu-name-match)    (and (fboundp 'easy-menu-name-match)
2351         (setq name (downcase name)))         (setq name (downcase name)))
2352    (or (intern-soft name)    (or (intern-soft name)
2353        (make-symbol name)))        (make-symbol name)))
2354    )
2355    
2356    
2357  (defsubst pr-visible-p (key)  (defsubst pr-visible-p (key)

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26