]> git.eshelyaron.com Git - emacs.git/commitdiff
Remove some compat code from bubbles.el
authorLars Ingebrigtsen <larsi@gnus.org>
Wed, 12 Aug 2020 16:39:17 +0000 (18:39 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Wed, 12 Aug 2020 16:39:17 +0000 (18:39 +0200)
* lisp/play/bubbles.el (bubbles--remove-overlays): Make into an
obsolete alias.
(bubbles--initialize, bubbles--show-images): Adjust callers.

lisp/play/bubbles.el

index e59825737921c32e86cd751b69e7997d727d5dd1..903c0686063d7be07654a48578fb3fbd62162483 100644 (file)
@@ -976,16 +976,14 @@ Set `bubbles--col-offset' and `bubbles--row-offset'."
                        (* image-vert-size (bubbles--grid-height)))
                     2)))))
 
-(defun bubbles--remove-overlays ()
-  "Remove all overlays."
-  (if (fboundp 'remove-overlays)
-      (remove-overlays)))
+(define-obsolete-function-alias 'bubbles--remove-overlays
+  'remove-overlays "28.1")
 
 (defun bubbles--initialize ()
   "Initialize Bubbles game."
   (bubbles--initialize-faces)
   (bubbles--initialize-images)
-  (bubbles--remove-overlays)
+  (remove-overlays)
 
   (switch-to-buffer (get-buffer-create "*bubbles*"))
   (bubbles--compute-offsets)
@@ -1409,7 +1407,7 @@ Return t if new char is non-empty."
 
 (defun bubbles--show-images ()
   "Update images in the bubbles buffer."
-  (bubbles--remove-overlays)
+  (remove-overlays)
   (if (and (display-images-p)
            bubbles--images-ok
            (not (eq bubbles-graphics-theme 'ascii)))