File tree Expand file tree Collapse file tree 1 file changed +4
-7
lines changed Expand file tree Collapse file tree 1 file changed +4
-7
lines changed Original file line number Diff line number Diff line change @@ -452,16 +452,13 @@ The command will prompt you to select one of the available sections."
452
452
(interactive )
453
453
(browse-url clojure-style-guide-url))
454
454
455
- (defun clojure-space-for-delimiter-p (endp delim )
455
+ (defun clojure-space-for-delimiter-p (endp _delim )
456
456
" Prevent paredit from inserting useless spaces.
457
457
See `paredit-space-for-delimiter-predicates' for the meaning of
458
458
ENDP and DELIM."
459
- (and (not (eq (char-before ) ?' ))
460
- (or endp
461
- (not (memq delim '(?\" ?\{ ?\( ))) ; ; always insert for [
462
- (not (or (derived-mode-p 'clojure-mode ) ; ; FIXME why does this check exist
463
- (derived-mode-p 'cider-repl-mode )))
464
- (not (looking-back " \\ _<#\\ ??" ))))) ; ; auto-gensym syntax foo#
459
+ (and (not endp)
460
+ ; ; don't insert after ' or # that is part of auto-gensym or reader conditional syntax
461
+ (not (looking-back " \\ _<\\ (?:'+\\ |#\\ ??\\ )" (point-at-bol )))))
465
462
466
463
467
464
(defconst clojure--collection-tag-regexp " #\\ (::[a-zA-Z0-9._-]*\\ |:?\\ ([a-zA-Z0-9._-]+/\\ )?[a-zA-Z0-9._-]+\\ )"
You can’t perform that action at this time.
0 commit comments