From: Stefan Kangas <stefan@marxist.se>
Date: Sat, 6 Aug 2022 14:29:14 +0000 (+0200)
Subject: Make {close,replace}-rectangle compat aliases obsolete
X-Git-Tag: emacs-29.0.90~1447^2~366
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2bbc5c597445cad9961b2480f31490f93a5d1ffa;p=emacs.git

Make {close,replace}-rectangle compat aliases obsolete

* lisp/rect.el (close-rectangle, replace-rectangle): Make compat
aliases obsolete.
---

diff --git a/lisp/rect.el b/lisp/rect.el
index eebbf999d40..6babd046051 100644
--- a/lisp/rect.el
+++ b/lisp/rect.el
@@ -407,7 +407,7 @@ no text on the right side of the rectangle."
 				    (point))))))
 
 ;;;###autoload
-(defalias 'close-rectangle 'delete-whitespace-rectangle) ;; Old name
+(define-obsolete-function-alias 'close-rectangle #'delete-whitespace-rectangle "29.1")
 
 ;;;###autoload
 (defun delete-whitespace-rectangle (start end &optional fill)
@@ -536,7 +536,7 @@ Called from a program, takes three args; START, END and STRING."
    (apply-on-rectangle 'string-rectangle-line start end string t)))
 
 ;;;###autoload
-(defalias 'replace-rectangle 'string-rectangle)
+(define-obsolete-function-alias 'replace-rectangle #'string-rectangle "29.1")
 
 ;;;###autoload
 (defun string-insert-rectangle (start end string)