branch: elpa/guru-mode
commit 9d0aff6cda6d3d78d5102f07f813b9fca6f0ab7b
Author: Bozhidar Batsov <bozhi...@batsov.com>
Commit: Bozhidar Batsov <bozhi...@batsov.com>
Refactor a bit guru-init
---
guru-mode.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/guru-mode.el b/guru-mode.el
index 28c42d1..9156041 100644
--- a/guru-mode.el
+++ b/guru-mode.el
@@ -94,10 +94,10 @@ The exact behavior of the lambda depends on the value of
`guru-warn-only'."
"Initialize the guru keybindings."
(dolist (cell guru-affected-bindings-list)
(let ((original-key (car cell))
- (recommended-key (car (cdr cell)))
- (original-binding (car (cdr (cdr cell)))))
+ (recommended-key (cadr cell))
+ (original-binding (caddr cell)))
(define-key guru-mode-map
- (read-kbd-macro (car cell)) (guru-rebind original-key recommended-key
original-binding)))))
+ (read-kbd-macro original-key) (guru-rebind original-key
recommended-key original-binding)))))
;;;###autoload
(define-minor-mode guru-mode
