From 911ba4d91510738e6e97829372c235eb91fbdbfb Mon Sep 17 00:00:00 2001 From: =?utf8?q?Fabi=C3=A1n=20Ezequiel=20Gallina?= Date: Mon, 30 Jun 2014 17:17:17 -0300 Subject: [PATCH] * lisp/emacs-lisp/subr-x.el (string-reverse): Define as obsolete alias for `reverse'. --- lisp/ChangeLog | 5 +++++ lisp/emacs-lisp/subr-x.el | 4 +--- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 877560e5f62..0b90c3c98ad 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-06-30 Fabián Ezequiel Gallina + + * emacs-lisp/subr-x.el (string-reverse): Define as obsolete alias + for `reverse'. + 2014-06-30 Glenn Morris * emacs-lisp/autoload.el (autoload-ensure-writable): New variable. diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el index 932c9e7f6ef..76473b39a77 100644 --- a/lisp/emacs-lisp/subr-x.el +++ b/lisp/emacs-lisp/subr-x.el @@ -159,9 +159,7 @@ to bind a single value, BINDINGS can just be a plain tuple." "Join all STRINGS using SEPARATOR." (mapconcat 'identity strings separator)) -(defsubst string-reverse (str) - "Reverse the string STR." - (reverse str)) +(define-obsolete-function-alias 'string-reverse 'reverse "24.5") (defsubst string-trim-left (string) "Remove leading whitespace from STRING." -- 2.39.5