From af6ea5578abf01d97abd86735bbddd08251ec11e Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Wed, 12 Aug 2020 18:39:17 +0200 Subject: [PATCH] Remove some compat code from bubbles.el * lisp/play/bubbles.el (bubbles--remove-overlays): Make into an obsolete alias. (bubbles--initialize, bubbles--show-images): Adjust callers. --- lisp/play/bubbles.el | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/lisp/play/bubbles.el b/lisp/play/bubbles.el index e5982573792..903c0686063 100644 --- a/lisp/play/bubbles.el +++ b/lisp/play/bubbles.el @@ -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))) -- 2.39.5