[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/printing.el
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/printing.el |
Date: |
Wed, 16 Nov 2005 17:43:28 -0500 |
Index: emacs/lisp/printing.el
diff -c emacs/lisp/printing.el:1.34 emacs/lisp/printing.el:1.35
*** emacs/lisp/printing.el:1.34 Sat Sep 24 13:44:01 2005
--- emacs/lisp/printing.el Wed Nov 16 22:43:28 2005
***************
*** 1042,1053 ****
;; To avoid compilation gripes
- (or (fboundp 'easy-menu-intern) ; hacked from easymenu.el
- (defsubst easy-menu-intern (s)
- (if (stringp s) (intern s) s)))
-
-
-
(or (fboundp 'subst-char-in-string) ; hacked from subr.el
(defun subst-char-in-string (fromchar tochar string &optional inplace)
"Replace FROMCHAR with TOCHAR in STRING each time it occurs.
--- 1042,1047 ----
***************
*** 2803,2810 ****
(and pr-print-using-ghostscript (not pr-spool-p)))
! (defun pr-get-symbol (name)
! (easy-menu-intern name))
(cond
((featurep 'xemacs) ; XEmacs
--- 2797,2806 ----
(and pr-print-using-ghostscript (not pr-spool-p)))
! (defalias 'pr-get-symbol
! (if (fboundp 'easy-menu-intern)
! 'easy-menu-intern
! (lambda (s) (if (stringp s) (intern s) s))))
(cond
((featurep 'xemacs) ; XEmacs
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/printing.el,
Stefan Monnier <=