File tree Expand file tree Collapse file tree 1 file changed +8
-4
lines changed Expand file tree Collapse file tree 1 file changed +8
-4
lines changed Original file line number Diff line number Diff line change @@ -229,11 +229,15 @@ ENDP and DELIMITER."
229229(declare-function paredit-open-curly " ext:paredit" )
230230(declare-function paredit-close-curly " ext:paredit" )
231231
232- (defun clojure-paredit-setup ()
233- " Make \" paredit-mode\" play nice with `clojure-mode' ."
232+ (defun clojure-paredit-setup (&optional keymap )
233+ " Make \" paredit-mode\" play nice with `clojure-mode' .
234+
235+ If an optional KEYMAP is passed the changes are applied to it,
236+ instead of to `clojure-mode-map' ."
234237 (when (>= paredit-version 21 )
235- (define-key clojure-mode-map " {" #'paredit-open-curly )
236- (define-key clojure-mode-map " }" #'paredit-close-curly )
238+ (let ((keymap (or keymap clojure-mode-map)))
239+ (define-key keymap " {" #'paredit-open-curly )
240+ (define-key keymap " }" #'paredit-close-curly ))
237241 (add-to-list 'paredit-space-for-delimiter-predicates
238242 #'clojure-space-for-delimiter-p )
239243 (add-to-list 'paredit-space-for-delimiter-predicates
You can’t perform that action at this time.
0 commit comments