(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))))))