diff options
Diffstat (limited to 'lisp/play')
| -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 @@ | |||
| 82 | 82 | ||
| 83 | ;; Non-customize variables. | 83 | ;; Non-customize variables. |
| 84 | 84 | ||
| 85 | (defmacro 5x5-defvar-local (var value doc) | ||
| 86 | "Define VAR to VALUE with documentation DOC and make it buffer local." | ||
| 87 | (declare (obsolete defvar-local "28.1")) | ||
| 88 | `(progn | ||
| 89 | (defvar ,var ,value ,doc) | ||
| 90 | (make-variable-buffer-local (quote ,var)))) | ||
| 91 | |||
| 92 | (defvar-local 5x5-grid nil | 85 | (defvar-local 5x5-grid nil |
| 93 | "5x5 grid contents.") | 86 | "5x5 grid contents.") |
| 94 | 87 | ||
| @@ -930,14 +923,15 @@ lest." | |||
| 930 | 923 | ||
| 931 | ;; Support functions | 924 | ;; Support functions |
| 932 | 925 | ||
| 933 | (define-obsolete-function-alias '5x5-xor 'xor "27.1") | ||
| 934 | |||
| 935 | (defun 5x5-y-or-n-p (prompt) | 926 | (defun 5x5-y-or-n-p (prompt) |
| 936 | "5x5 wrapper for `y-or-n-p' which respects the `5x5-hassle-me' setting." | 927 | "5x5 wrapper for `y-or-n-p' which respects the `5x5-hassle-me' setting." |
| 937 | (if 5x5-hassle-me | 928 | (if 5x5-hassle-me |
| 938 | (y-or-n-p prompt) | 929 | (y-or-n-p prompt) |
| 939 | t)) | 930 | t)) |
| 940 | 931 | ||
| 932 | (define-obsolete-function-alias '5x5-xor #'xor "27.1") | ||
| 933 | (define-obsolete-function-alias '5x5-defvar-local #'defvar-local "28.1") | ||
| 934 | |||
| 941 | (provide '5x5) | 935 | (provide '5x5) |
| 942 | 936 | ||
| 943 | ;;; 5x5.el ends here | 937 | ;;; 5x5.el ends here |