emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 2bbc5c5974 2/5: Make {close, replace}-rectangle compat aliases ob


From: Stefan Kangas
Subject: master 2bbc5c5974 2/5: Make {close, replace}-rectangle compat aliases obsolete
Date: Sat, 6 Aug 2022 11:29:32 -0400 (EDT)

branch: master
commit 2bbc5c597445cad9961b2480f31490f93a5d1ffa
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Make {close,replace}-rectangle compat aliases obsolete
    
    * lisp/rect.el (close-rectangle, replace-rectangle): Make compat
    aliases obsolete.
---
 lisp/rect.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/rect.el b/lisp/rect.el
index eebbf999d4..6babd04605 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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]