Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

Make pr-version variable obsolete

Browse source 
* lisp/printing.el (pr-version): Make obsolete.
(pr-help-message, pr-interface-help-message, pr-setup)
(pr-create-interface): Don't use above obsolete variable.
This commit is contained in:
Stefan Kangas 2022-08-11 15:21:08 +02:00
parent 89f5167379
commit 686296b512
1 changed files with 10 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

25
lisp/printing.el
View file

@ -4,16 +4,9 @@
;; Author: Vinicius Jose Latorre <viniciusjl.gnu@gmail.com>
;; Keywords: wp, print, PostScript
;; Version: 6.9.3
;; Old-Version: 6.9.3
;; URL: https://www.emacswiki.org/cgi-bin/wiki/ViniciusJoseLatorre
(defconst pr-version "6.9.3"
"printing.el, v 6.9.3 <2007/12/09 vinicius>
Please send all bug fixes and enhancements to
bug-gnu-emacs@gnu.org and Vinicius Jose Latorre <viniciusjl.gnu@gmail.com>
")
;; This file is part of GNU Emacs.
;; GNU Emacs is free software: you can redistribute it and/or modify
@ -3007,8 +3000,7 @@ Calls `pr-update-menus' to adjust menus."
(defconst pr-help-message
(concat "printing.el version " pr-version
" ps-print.el version " ps-print-version
(concat "ps-print.el version " ps-print-version
"\n\n
Menu Layout
-----------
@ -3220,8 +3212,7 @@ VI. Customization:
(defconst pr-interface-help-message
(concat "printing.el version " pr-version
" ps-print.el version " ps-print-version
(concat " ps-print.el version " ps-print-version
"\n\n
The printing interface buffer has the same functionality as the printing menu.
The major difference is that the states (like sending PostScript generated to a
@ -4402,7 +4393,6 @@ Or choose the menu option Printing/Show Settings/printing."
(mapconcat
#'ps-print-quote
(list
(concat "\n;;; printing.el version " pr-version "\n")
";; internal vars"
(ps-comment-string "emacs-version " emacs-version)
(ps-comment-string "pr-txt-command " pr-txt-command)
@ -5597,8 +5587,7 @@ COMMAND.exe, COMMAND.bat and COMMAND.com in this order."
(switch-to-buffer (get-buffer-create pr-buffer-name))
;; header
(let ((versions (concat "printing v" pr-version
" ps-print v" ps-print-version)))
(let ((versions (concat "ps-print v" ps-print-version)))
(widget-insert (make-string (- 79 (length versions)) ?\ ) versions))
(pr-insert-italic "\nCurrent Directory : " 1)
(pr-insert-italic default-directory)
@ -6213,6 +6202,12 @@ COMMAND.exe, COMMAND.bat and COMMAND.com in this order."
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defconst pr-version "6.9.3"
"printing.el, v 6.9.3 <2007/12/09 vinicius>
Please send all bug fixes and enhancements to
bug-gnu-emacs@gnu.org and Vinicius Jose Latorre <viniciusjl.gnu@gmail.com>")
(make-obsolete-variable 'pr-version 'emacs-version "29.1")
(provide 'printing)