File tree Expand file tree Collapse file tree 1 file changed +7
-4
lines changed Expand file tree Collapse file tree 1 file changed +7
-4
lines changed Original file line number Diff line number Diff line change @@ -3359,10 +3359,13 @@ See: https://github.com/clojure-emacs/clj-refactor.el/wiki/cljr-create-fn-from-e
3359
3359
(cljr--insert-example-fn fn-name args path))))
3360
3360
3361
3361
(defun cljr--inflect-last-word (f s )
3362
- (let* ((words (s-split " -" s))
3363
- (last-word (-last-item words))
3364
- (prefix (-butlast words)))
3365
- (s-join " -" (-concat prefix (list (funcall f last-word))))))
3362
+ (save-match-data
3363
+ (let* ((words (split-string s " -" ))
3364
+ (last-word (car (last words)))
3365
+ (prefix (butlast words)))
3366
+ (mapconcat 'identity
3367
+ (append prefix (list (funcall f last-word)))
3368
+ " -" ))))
3366
3369
3367
3370
(defun cljr--create-fn-from-list-fold (args path )
3368
3371
(cljr--insert-example-fn (car args)
You can’t perform that action at this time.
0 commit comments