summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2022-07-21 08:21:16 +0200
committerStefan Kangas <stefan@marxist.se>2022-07-21 08:45:18 +0200
commit6940cebe032858e307fa24fb32ba9f5c8cb56835 (patch)
tree40e8854b2a2f7931aaffbb19c172263e28f3364c /lisp
parenta4c0ea395bdf95b00d25f42b25335a43161a9eb4 (diff)
downloademacs-6940cebe032858e307fa24fb32ba9f5c8cb56835.tar.gz
emacs-6940cebe032858e307fa24fb32ba9f5c8cb56835.tar.bz2
emacs-6940cebe032858e307fa24fb32ba9f5c8cb56835.zip
Make bubbles-quit obsolete in favor of quit-window
* lisp/play/bubbles.el (bubbles-quit): Make obsolete in favor of quit-window. Update uses.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/play/bubbles.el9
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/play/bubbles.el b/lisp/play/bubbles.el
index 93fbc3b51b7..808fc82d19a 100644
--- a/lisp/play/bubbles.el
+++ b/lisp/play/bubbles.el
@@ -30,6 +30,8 @@
;; Bubbles is an implementation of the "Same Game", similar to "Same
;; GNOME" and many others, see <https://en.wikipedia.org/wiki/SameGame>.
+;;; Code:
+
;; ======================================================================
;;; History:
@@ -70,8 +72,6 @@
;; ======================================================================
-;;; Code:
-
(require 'gamegrid)
;; User options
@@ -812,7 +812,7 @@ static char * dot3d_xpm[] = {
(defvar-keymap bubbles-mode-map
:doc "Mode map for `bubbles'."
:name 'bubbles-mode-map
- "q" #'bubbles-quit
+ "q" #'quit-window
"C-j" #'bubbles-plop
"SPC" #'bubbles-plop
"C-m" #'bubbles-plop
@@ -871,7 +871,7 @@ static char * dot3d_xpm[] = {
["Save all settings" bubbles-save-settings]
"---"
["New game" bubbles]
- ["Quit" bubbles-quit]))
+ ["Quit" quit-window]))
;; bind menu to mouse
(define-key bubbles-mode-map [down-mouse-3] bubbles-menu)
@@ -910,6 +910,7 @@ columns on its right towards the left.
(defun bubbles-quit ()
"Quit Bubbles."
+ (declare (obsolete quit-window "29.1"))
(interactive nil bubbles-mode)
(message "bubbles-quit")
(bury-buffer))