Mercurial > emacs
comparison lisp/vc.el @ 94612:b37bca16668a
Typo fix.
author | Eric S. Raymond <esr@snark.thyrsus.com> |
---|---|
date | Sun, 04 May 2008 13:20:50 +0000 |
parents | 78377ffa1363 |
children | 070ce953fab4 |
comparison
equal
deleted
inserted
replaced
94611:78377ffa1363 | 94612:b37bca16668a |
---|---|
2213 (if (eq major-mode 'vc-dir-mode) | 2213 (if (eq major-mode 'vc-dir-mode) |
2214 (vc-dir-refresh) | 2214 (vc-dir-refresh) |
2215 ;; Otherwise, initialize a new view using the dispatcher layer | 2215 ;; Otherwise, initialize a new view using the dispatcher layer |
2216 (progn | 2216 (progn |
2217 ;; Build a capability object and hand it to the dispatcher initializer | 2217 ;; Build a capability object and hand it to the dispatcher initializer |
2218 (vc-dir-mode (vc-make-backend-object backend)) | 2218 (vc-dir-mode (vc-make-backend-object dir)) |
2219 ;; Add VC-specific keybindings | 2219 ;; Add VC-specific keybindings |
2220 (let ((map (current-local-map))) | 2220 (let ((map (current-local-map))) |
2221 (define-key map "=" 'vc-diff) ;; C-x v = | 2221 (define-key map "=" 'vc-diff) ;; C-x v = |
2222 (define-key map "a" 'vc-dir-register) | 2222 (define-key map "a" 'vc-dir-register) |
2223 (define-key map "+" 'vc-update) ;; C-x v + | 2223 (define-key map "+" 'vc-update) ;; C-x v + |