diff options
author | Bozhidar Batsov <bozhidar@batsov.com> | 2016-02-13 11:22:48 +0200 |
---|---|---|
committer | Bozhidar Batsov <bozhidar@batsov.com> | 2016-02-13 11:22:48 +0200 |
commit | 10acc018bbf22adb6a612ddd77ed7632c16104e2 (patch) | |
tree | f7f0392ec41186c534347bf2ae95db707cd61a9b /cider-compat.el | |
parent | 0bf82371b187a00e47373db8a1ce0e862d1fe7c4 (diff) |
Convert a couple of inlined functions to regular functions
This should make the byte-compiler happy.
Diffstat (limited to 'cider-compat.el')
-rw-r--r-- | cider-compat.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/cider-compat.el b/cider-compat.el index 4c02025a..3c0b1107 100644 --- a/cider-compat.el +++ b/cider-compat.el @@ -155,19 +155,19 @@ to bind a single value, BINDINGS can just be a plain tuple." (eval-and-compile (unless (fboundp 'string-trim) - (defsubst string-trim-left (string) + (defun string-trim-left (string) "Remove leading whitespace from STRING." (if (string-match "\\`[ \t\n\r]+" string) (replace-match "" t t string) string)) - (defsubst string-trim-right (string) + (defun string-trim-right (string) "Remove trailing whitespace from STRING." (if (string-match "[ \t\n\r]+\\'" string) (replace-match "" t t string) string)) - (defsubst string-trim (string) + (defun string-trim (string) "Remove leading and trailing whitespace from STRING." (string-trim-left (string-trim-right string))))) |