@@ -217,8 +217,8 @@ Out-of-the box `clojure-mode' understands lein, boot, gradle,
217
217
(define-key map (kbd " f" ) #'clojure-thread-first-all )
218
218
(define-key map (kbd " C-l" ) #'clojure-thread-last-all )
219
219
(define-key map (kbd " l" ) #'clojure-thread-last-all )
220
- (define-key map (kbd " C-a " ) #'clojure-unwind-all )
221
- (define-key map (kbd " a " ) #'clojure-unwind-all )
220
+ (define-key map (kbd " C-U " ) #'clojure-unwind-all )
221
+ (define-key map (kbd " U " ) #'clojure-unwind-all )
222
222
(define-key map (kbd " C-p" ) #'clojure-cycle-privacy )
223
223
(define-key map (kbd " p" ) #'clojure-cycle-privacy )
224
224
(define-key map (kbd " C-(" ) #'clojure-convert-collection-to-list )
@@ -241,10 +241,12 @@ Out-of-the box `clojure-mode' understands lein, boot, gradle,
241
241
(define-key map (kbd " n h" ) #'clojure-insert-ns-form-at-point )
242
242
(define-key map (kbd " n u" ) #'clojure-update-ns )
243
243
(define-key map (kbd " n s" ) #'clojure-sort-ns )
244
+ (define-key map (kbd " n r" ) #'clojure-rename-ns-alias )
244
245
(define-key map (kbd " s i" ) #'clojure-introduce-let )
245
246
(define-key map (kbd " s m" ) #'clojure-move-to-let )
246
247
(define-key map (kbd " s f" ) #'clojure-let-forward-slurp-sexp )
247
248
(define-key map (kbd " s b" ) #'clojure-let-backward-slurp-sexp )
249
+ (define-key map (kbd " a" ) #'clojure-add-arity )
248
250
map)
249
251
" Keymap for Clojure refactoring commands." )
250
252
(fset 'clojure-refactor-map clojure-refactor-map)
@@ -263,11 +265,13 @@ Out-of-the box `clojure-mode' understands lein, boot, gradle,
263
265
[" Cycle if, if-not" clojure-cycle-if]
264
266
[" Cycle when, when-not" clojure-cycle-when]
265
267
[" Cycle not" clojure-cycle-not]
268
+ [" Add function arity" clojure-add-arity]
266
269
(" ns forms"
267
270
[" Insert ns form at the top" clojure-insert-ns-form]
268
271
[" Insert ns form here" clojure-insert-ns-form-at-point]
269
272
[" Update ns form" clojure-update-ns]
270
- [" Sort ns form" clojure-sort-ns])
273
+ [" Sort ns form" clojure-sort-ns]
274
+ [" Rename ns alias" clojure-rename-ns-alias])
271
275
(" Convert collection"
272
276
[" Convert to list" clojure-convert-collection-to-list]
273
277
[" Convert to quoted list" clojure-convert-collection-to-quoted-list]
0 commit comments