diff options
| author | Stefan Kangas <stefan@marxist.se> | 2022-08-11 13:16:34 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2022-08-11 13:16:42 +0200 |
| commit | a2ecf73545bcab598de8c8996c5591d6ffa5d1fc (patch) | |
| tree | 83aa14d4a2970f1c40e05246d52a6eb3d1971a60 | |
| parent | e93a1a835e82cf8e86f84f6851e6524d0bab8697 (diff) | |
| download | emacs-a2ecf73545bcab598de8c8996c5591d6ffa5d1fc.tar.gz | |
; * lisp/play/5x5.el (5x5-defvar-local): Improve obsoletion.
| -rw-r--r-- | lisp/play/5x5.el | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/lisp/play/5x5.el b/lisp/play/5x5.el index 8fe72ddf593..fb944f4d76a 100644 --- a/lisp/play/5x5.el +++ b/lisp/play/5x5.el @@ -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 |