summaryrefslogtreecommitdiff
path: root/cider-compat.el
diff options
context:
space:
mode:
Diffstat (limited to 'cider-compat.el')
-rw-r--r--cider-compat.el18
1 files changed, 0 insertions, 18 deletions
diff --git a/cider-compat.el b/cider-compat.el
index 3c0b1107..d551d64f 100644
--- a/cider-compat.el
+++ b/cider-compat.el
@@ -153,23 +153,5 @@ to bind a single value, BINDINGS can just be a plain tuple."
(declare (indent 1) (debug if-let))
(list 'if-let bindings (macroexp-progn body)))))
-(eval-and-compile
- (unless (fboundp 'string-trim)
- (defun string-trim-left (string)
- "Remove leading whitespace from STRING."
- (if (string-match "\\`[ \t\n\r]+" string)
- (replace-match "" t t string)
- string))
-
- (defun string-trim-right (string)
- "Remove trailing whitespace from STRING."
- (if (string-match "[ \t\n\r]+\\'" string)
- (replace-match "" t t string)
- string))
-
- (defun string-trim (string)
- "Remove leading and trailing whitespace from STRING."
- (string-trim-left (string-trim-right string)))))
-
(provide 'cider-compat)
;;; cider-compat.el ends here