We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent d4010db commit dcb523bCopy full SHA for dcb523b
inf-clojure.el
@@ -1352,9 +1352,11 @@ you might want to use in your customization."
1352
(save-excursion
1353
(let ((end (point)))
1354
(skip-chars-backward (concat "^" inf-clojure-clojure-expr-break-chars))
1355
- (let ((first-char (substring-no-properties (thing-at-point 'symbol) 0 1)))
1356
- (when (string-match-p "[^0-9]" first-char)
1357
- (cons (point) end)))))))
+ (let ((chars (thing-at-point 'symbol)))
+ (when (> (length chars) 0)
+ (let ((first-char (substring-no-properties chars 0 1)))
1358
+ (when (string-match-p "[^0-9]" first-char)
1359
+ (cons (point) end)))))))))
1360
1361
(defun inf-clojure-completion-expr-at-point ()
1362
"Return expression at point to complete."
0 commit comments