[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master fdb88899d4 2/3: Make ps-mode-version variable obsolete
From: |
Stefan Kangas |
Subject: |
master fdb88899d4 2/3: Make ps-mode-version variable obsolete |
Date: |
Sat, 13 Aug 2022 07:19:28 -0400 (EDT) |
branch: master
commit fdb88899d40956c1aa22fbbc03cad8b8a6b73204
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>
Make ps-mode-version variable obsolete
* lisp/progmodes/ps-mode.el (ps-mode-version): Make obsolete.
(ps-mode-show-version, ps-mode-submit-bug-report): Don't use above
obsolete variable.
---
lisp/progmodes/ps-mode.el | 8 +++++---
1 file changed, 5 insertions(+), 3 deletions(-)
diff --git a/lisp/progmodes/ps-mode.el b/lisp/progmodes/ps-mode.el
index 7c9aee2b2a..89482d86ce 100644
--- a/lisp/progmodes/ps-mode.el
+++ b/lisp/progmodes/ps-mode.el
@@ -34,7 +34,6 @@
;;; Code:
-(defconst ps-mode-version "1.1i, 17 May 2008")
(defconst ps-mode-maintainer-address
"Peter Kleiweg <p.c.j.kleiweg@rug.nl>, bug-gnu-emacs@gnu.org")
@@ -519,7 +518,7 @@ Typing \\<ps-run-mode-map>\\[ps-run-goto-error] when the
cursor is at the number
(defun ps-mode-show-version ()
"Show current version of PostScript mode."
(interactive)
- (message " *** PostScript Mode (ps-mode) Version %s *** " ps-mode-version))
+ (message " *** PostScript Mode (ps-mode) in GNU Emacs %s *** "
emacs-version))
;; From reporter.el
(defvar reporter-prompt-for-summary-p)
@@ -534,7 +533,7 @@ Typing \\<ps-run-mode-map>\\[ps-run-goto-error] when the
cursor is at the number
ps-run-font-lock-keywords-2)))
(reporter-submit-bug-report
ps-mode-maintainer-address
- (format "ps-mode.el %s [%s]" ps-mode-version system-type)
+ (format "ps-mode.el %s [%s]" emacs-version system-type)
'(ps-mode-tab
ps-mode-paper-size
ps-mode-print-function
@@ -1094,6 +1093,9 @@ Use line numbers if `ps-run-error-line-numbers' is not
nil."
;;
(add-hook 'kill-emacs-hook #'ps-run-cleanup)
+(defconst ps-mode-version "1.1i, 17 May 2008")
+(make-obsolete-variable 'ps-mode-version 'emacs-version "29.1")
+
(provide 'ps-mode)
;;; ps-mode.el ends here