]> git.eshelyaron.com Git - emacs.git/commitdiff
Remove some compat code from ediff-util.el
authorLars Ingebrigtsen <larsi@gnus.org>
Tue, 18 Aug 2020 09:55:29 +0000 (11:55 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Tue, 18 Aug 2020 09:55:29 +0000 (11:55 +0200)
* lisp/vc/ediff-util.el (ediff-minibuffer-with-setup-hook): Make
into an obsolete macro.
(ediff-read-file-name): Adjust caller.

lisp/vc/ediff-util.el

index 4a84c1ecd9c0be3ef3e0b0fac457c0bb9e9b7f5d..e31f43dded3618f402d44eed869d764d0f4737d1 100644 (file)
@@ -3069,10 +3069,8 @@ Hit \\[ediff-recenter] to reset the windows afterward."
 
 
 ;; for compatibility
-(defmacro ediff-minibuffer-with-setup-hook (fun &rest body)
-  `(if (fboundp 'minibuffer-with-setup-hook)
-       (minibuffer-with-setup-hook ,fun ,@body)
-     ,@body))
+(define-obsolete-function-alias 'ediff-minibuffer-with-setup-hook
+  #'minibuffer-with-setup-hook "28.1")
 
 ;; This is adapted from a similar function in `emerge.el'.
 ;; PROMPT should not have a trailing ': ', so that it can be modified
@@ -3101,7 +3099,7 @@ Hit \\[ediff-recenter] to reset the windows afterward."
                        (and default-file (list default-file))
                        default-dir)))
        f)
-    (setq f (ediff-minibuffer-with-setup-hook
+    (setq f (minibuffer-with-setup-hook
                (lambda () (when defaults
                             (setq minibuffer-default defaults)))
              (read-file-name