stardiviner
9/7/2015 - 11:05 AM

paredit-circular-list.el

(add-to-list 'paredit-space-for-delimiter-predicates 'no-space-for-list-refs)

(defun no-space-for-list-refs (endp delimiter)
  (or endp
     (save-excursion
       (not (and (eq delimiter ?\()
             (re-search-backward (rx "#" (+ (any "0-9")) "#=")
                                 (line-beginning-position) t))))))