File tree Expand file tree Collapse file tree 1 file changed +4
-13
lines changed Expand file tree Collapse file tree 1 file changed +4
-13
lines changed Original file line number Diff line number Diff line change @@ -457,20 +457,11 @@ The command will prompt you to select one of the available sections."
457
457
See `paredit-space-for-delimiter-predicates' for the meaning of
458
458
ENDP and DELIM."
459
459
(or endp
460
- (not (memq delim '(?\" ?{ ?\( )))
461
- (not (or (derived-mode-p 'clojure-mode )
460
+ (not (memq delim '(?\" ?\ { ?\( ))) ; ; always insert for [
461
+ (not (or (derived-mode-p 'clojure-mode ) ; ; FIXME why does this check exist
462
462
(derived-mode-p 'cider-repl-mode )))
463
- (save-excursion
464
- (backward-char )
465
- (cond ((eq (char-after ) ?# )
466
- (and (not (bobp ))
467
- (or (char-equal ?w (char-syntax (char-before )))
468
- (char-equal ?_ (char-syntax (char-before ))))))
469
- ((and (eq delim ?\( )
470
- (eq (char-after ) ?? )
471
- (eq (char-before ) ?# ))
472
- nil )
473
- (t )))))
463
+ (not (looking-back " \\ _<#\\ ??" )))) ; ; auto-gensym syntax foo#
464
+
474
465
475
466
(defconst clojure--collection-tag-regexp " #\\ (::[a-zA-Z0-9._-]*\\ |:?\\ ([a-zA-Z0-9._-]+/\\ )?[a-zA-Z0-9._-]+\\ )"
476
467
" Collection reader macro tag regexp.
You can’t perform that action at this time.
0 commit comments