File tree Expand file tree Collapse file tree 1 file changed +12
-7
lines changed Expand file tree Collapse file tree 1 file changed +12
-7
lines changed Original file line number Diff line number Diff line change @@ -473,13 +473,18 @@ to use the status buffer's original `k' binding at point."
473
473
(local-set-key (kbd rebind-key)
474
474
(lambda ()
475
475
(interactive )
476
- (call-interactively
477
- ; ; Local maps are those local to the buffer
478
- ; ; or a region of the buffer.
479
- (if-let ((local (lookup-key (current-local-map ) key)))
480
- (or (command-remapping local)
481
- local)
482
- cmd))))))))))
476
+ ; ; Local maps are those local to the buffer
477
+ ; ; or a region of the buffer.
478
+ (let* ((local (lookup-key (current-local-map ) key))
479
+ (remapped (command-remapping local)))
480
+ (call-interactively
481
+ (cond
482
+ ((commandp remapped)
483
+ remapped)
484
+ ((commandp local)
485
+ local)
486
+ (t
487
+ cmd))))))))))))
483
488
484
489
(defun meow--prepare-region-for-kill ()
485
490
(when (and (equal 'line (cdr (meow--selection-type)))
You can’t perform that action at this time.
0 commit comments