[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/printing.el
From: |
Vinicius Jose Latorre |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/printing.el |
Date: |
Mon, 03 Mar 2003 15:03:19 -0500 |
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 ()
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/printing.el,
Vinicius Jose Latorre <=