mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-01 11:14:55 +00:00
; * lisp/play/5x5.el (5x5-defvar-local): Improve obsoletion.
This commit is contained in:
parent
e93a1a835e
commit
a2ecf73545
@ -82,13 +82,6 @@
|
||||
|
||||
;; Non-customize variables.
|
||||
|
||||
(defmacro 5x5-defvar-local (var value doc)
|
||||
"Define VAR to VALUE with documentation DOC and make it buffer local."
|
||||
(declare (obsolete defvar-local "28.1"))
|
||||
`(progn
|
||||
(defvar ,var ,value ,doc)
|
||||
(make-variable-buffer-local (quote ,var))))
|
||||
|
||||
(defvar-local 5x5-grid nil
|
||||
"5x5 grid contents.")
|
||||
|
||||
@ -930,14 +923,15 @@ lest."
|
||||
|
||||
;; Support functions
|
||||
|
||||
(define-obsolete-function-alias '5x5-xor 'xor "27.1")
|
||||
|
||||
(defun 5x5-y-or-n-p (prompt)
|
||||
"5x5 wrapper for `y-or-n-p' which respects the `5x5-hassle-me' setting."
|
||||
(if 5x5-hassle-me
|
||||
(y-or-n-p prompt)
|
||||
t))
|
||||
|
||||
(define-obsolete-function-alias '5x5-xor #'xor "27.1")
|
||||
(define-obsolete-function-alias '5x5-defvar-local #'defvar-local "28.1")
|
||||
|
||||
(provide '5x5)
|
||||
|
||||
;;; 5x5.el ends here
|
||||
|
Loading…
Reference in New Issue
Block a user