summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorFabián Ezequiel Gallina <fgallina@gnu.org>2014-06-30 01:54:46 -0300
committerFabián Ezequiel Gallina <fgallina@gnu.org>2014-06-30 01:54:46 -0300
commitde12301ea1959d81f3ad4c5b624ee998ffb55e2b (patch)
tree2bd0c9bcd7c00b489c833920211a76a2aaf12dab /lisp/emacs-lisp
parentc08f8be29f4f6d107da5cc38d614519df7a6ab11 (diff)
downloademacs-de12301ea1959d81f3ad4c5b624ee998ffb55e2b.tar.gz
* lisp/emacs-lisp/subr-x.el (string-reverse): Use `reverse'.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/subr-x.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el
index 60cd7b8995b..932c9e7f6ef 100644
--- a/lisp/emacs-lisp/subr-x.el
+++ b/lisp/emacs-lisp/subr-x.el
@@ -161,7 +161,7 @@ to bind a single value, BINDINGS can just be a plain tuple."
(defsubst string-reverse (str)
"Reverse the string STR."
- (apply 'string (nreverse (string-to-list str))))
+ (reverse str))
(defsubst string-trim-left (string)
"Remove leading whitespace from STRING."