diff options
| author | Bozhidar Batsov <bozhidar@batsov.com> | 2013-12-07 20:46:03 +0200 |
|---|---|---|
| committer | Bozhidar Batsov <bozhidar@batsov.com> | 2013-12-07 20:46:03 +0200 |
| commit | 73c8ceea1ab335aae9221a671ae0959704669a52 (patch) | |
| tree | bc67ee16e106ee1c830fd490d252df19ea997ea9 | |
| parent | 947003b598285cf9cbc4878524167cd98d718994 (diff) | |
| download | emacs-73c8ceea1ab335aae9221a671ae0959704669a52.tar.gz | |
* lisp/emacs-lisp/helpers.el (string-blank-p): Use `string-match-p'.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/emacs-lisp/helpers.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d032e3c9243..17d7c0bdd34 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2013-12-07 Bozhidar Batsov <bozhidar@batsov.com> + + * emacs-lisp/helpers.el (string-blank-p): Use `string-match-p'. + 2013-12-07 Tassilo Horn <tsdh@gnu.org> * help-fns.el (describe-function-1): Use new advice-* functions diff --git a/lisp/emacs-lisp/helpers.el b/lisp/emacs-lisp/helpers.el index 8049f4e1d1d..b7996ade777 100644 --- a/lisp/emacs-lisp/helpers.el +++ b/lisp/emacs-lisp/helpers.el @@ -67,7 +67,7 @@ (defsubst string-blank-p (string) "Check whether STRING is either empty or only whitespace." - (string-empty-p (string-trim string))) + (string-match-p "\\`[ \t\n\r]*\\'" string)) (provide 'helpers) |