* lisp/format.el (format-proper-list-p): New alias.

diff --git a/etc/NEWS b/etc/NEWS
index c69bbe9d0f65f6ba9361ac9edde55eb02b3434ac..2a93bdf0253cc88714dc08819bc2c3d7fa1677ae 100644 (file)
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -713,7 +713,8 @@ manual for more details.
 +++
 ** New function 'proper-list-p'.
 Given a proper list as argument, this predicate returns its length;
-otherwise, it returns nil.
+otherwise, it returns nil.  'format-proper-list-p' is now an obsolete
+alias for the new function.
 
 ** define-minor-mode automatically documents the meaning of ARG
 

diff --git a/lisp/format.el b/lisp/format.el
index 5bf1be394757dffc4a24d98041c86dca6480fabc..49d3c718abcec7b18021ce13c25263ec3ce486dc 100644 (file)
--- a/lisp/format.el
+++ b/lisp/format.el
@@ -539,6 +539,8 @@ Compare using `equal'."
        (setq tail next)))
     (cons acopy bcopy)))
 
+(define-obsolete-function-alias 'format-proper-list-p 'proper-list-p "27.1")
+
 (defun format-reorder (items order)
   "Arrange ITEMS to follow partial ORDER.
 Elements of ITEMS equal to elements of ORDER will be rearranged