[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: |
Thu, 11 Nov 2004 21:21:42 -0500 |
Index: emacs/lisp/printing.el
diff -c emacs/lisp/printing.el:1.20 emacs/lisp/printing.el:1.21
*** emacs/lisp/printing.el:1.20 Thu Nov 11 15:01:34 2004
--- emacs/lisp/printing.el Fri Nov 12 02:14:03 2004
***************
*** 5,17 ****
;; Author: Vinicius Jose Latorre <address@hidden>
;; Maintainer: Vinicius Jose Latorre <address@hidden>
! ;; Time-stamp: <2004/09/26 22:11:24 vinicius>
;; Keywords: wp, print, PostScript
! ;; Version: 6.8.1
;; X-URL: http://www.cpqd.com.br/~vinicius/emacs/
! (defconst pr-version "6.8.1"
! "printing.el, v 6.8.1 <2004/09/26 vinicius>
Please send all bug fixes and enhancements to
Vinicius Jose Latorre <address@hidden>
--- 5,17 ----
;; Author: Vinicius Jose Latorre <address@hidden>
;; Maintainer: Vinicius Jose Latorre <address@hidden>
! ;; Time-stamp: <2004/11/11 23:54:13 vinicius>
;; Keywords: wp, print, PostScript
! ;; Version: 6.8.2
;; X-URL: http://www.cpqd.com.br/~vinicius/emacs/
! (defconst pr-version "6.8.2"
! "printing.el, v 6.8.2 <2004/11/11 vinicius>
Please send all bug fixes and enhancements to
Vinicius Jose Latorre <address@hidden>
***************
*** 1099,1104 ****
--- 1099,1105 ----
:tag "Printing Utilities"
:link '(emacs-library-link :tag "Source Lisp File" "printing.el")
:prefix "pr-"
+ :version "20"
:group 'wp
:group 'postscript)
***************
*** 2474,2490 ****
(eval-and-compile
(defun pr-get-symbol (name)
! (or (intern-soft name)
! (make-symbol name)))
(cond
((eq ps-print-emacs-type 'emacs) ; GNU Emacs
! (defsubst pr-region-active-p ()
(and pr-auto-region transient-mark-mode mark-active)))
((eq ps-print-emacs-type 'xemacs) ; XEmacs
(defvar zmacs-region-stays nil) ; to avoid compilation gripes
! (defsubst pr-region-active-p ()
(and pr-auto-region (not zmacs-region-stays) (ps-mark-active-p)))))
--- 2475,2490 ----
(eval-and-compile
(defun pr-get-symbol (name)
! (easy-menu-intern name))
(cond
((eq ps-print-emacs-type 'emacs) ; GNU Emacs
! (defun pr-region-active-p ()
(and pr-auto-region transient-mark-mode mark-active)))
((eq ps-print-emacs-type 'xemacs) ; XEmacs
(defvar zmacs-region-stays nil) ; to avoid compilation gripes
! (defun pr-region-active-p ()
(and pr-auto-region (not zmacs-region-stays) (ps-mark-active-p)))))
***************
*** 2904,2921 ****
(pr-get-symbol "Printing")))))
;; Emacs 21
(pr-menu-print-item
! (easy-menu-change '("files") "Print" pr-menu-spec "print-buffer")
(let ((items '("print-buffer" "print-region"
"ps-print-buffer-faces" "ps-print-region-faces"
"ps-print-buffer" "ps-print-region")))
(while items
! (easy-menu-remove-item nil '("files") (car items))
(setq items (cdr items)))
(setq pr-menu-print-item nil
! pr-menu-bar (vector 'menu-bar 'files
(pr-get-symbol "Print")))))
(t
! (easy-menu-change '("files") "Print" pr-menu-spec)))
;; Key binding
(global-set-key [print] 'pr-ps-fast-fire)
--- 2904,2921 ----
(pr-get-symbol "Printing")))))
;; Emacs 21
(pr-menu-print-item
! (easy-menu-change '("file") "Print" pr-menu-spec "print-buffer")
(let ((items '("print-buffer" "print-region"
"ps-print-buffer-faces" "ps-print-region-faces"
"ps-print-buffer" "ps-print-region")))
(while items
! (easy-menu-remove-item nil '("file") (car items))
(setq items (cdr items)))
(setq pr-menu-print-item nil
! pr-menu-bar (vector 'menu-bar 'file
(pr-get-symbol "Print")))))
(t
! (easy-menu-change '("file") "Print" pr-menu-spec)))
;; Key binding
(global-set-key [print] 'pr-ps-fast-fire)
- [Emacs-diffs] Changes to emacs/lisp/printing.el, Stefan Monnier, 2004/11/11
- [Emacs-diffs] Changes to emacs/lisp/printing.el,
Vinicius Jose Latorre <=
- [Emacs-diffs] Changes to emacs/lisp/printing.el, Vinicius Jose Latorre, 2004/11/13
- [Emacs-diffs] Changes to emacs/lisp/printing.el, Vinicius Jose Latorre, 2004/11/14
- [Emacs-diffs] Changes to emacs/lisp/printing.el, Vinicius Jose Latorre, 2004/11/15
- [Emacs-diffs] Changes to emacs/lisp/printing.el, Vinicius Jose Latorre, 2004/11/17
- [Emacs-diffs] Changes to emacs/lisp/printing.el, Vinicius Jose Latorre, 2004/11/21