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."
229
229
(declare-function paredit-open-curly " ext:paredit" )
230
230
(declare-function paredit-close-curly " ext:paredit" )
231
231
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' ."
234
237
(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 ))
237
241
(add-to-list 'paredit-space-for-delimiter-predicates
238
242
#'clojure-space-for-delimiter-p )
239
243
(add-to-list 'paredit-space-for-delimiter-predicates
You can’t perform that action at this time.
0 commit comments