(vc-dir-mode): Check tool-bar-mode is bound.

This commit is contained in:
Glenn Morris
2008-06-12 03:49:52 +00:00
parent e9c033a098
commit 6b9ebb348a

View File

@@ -1354,7 +1354,8 @@ U - if the cursor is on a file: unmark all the files with the same state
(setq major-mode 'vc-dir-mode)
(setq buffer-read-only t)
(use-local-map vc-dir-mode-map)
(set (make-local-variable 'tool-bar-map) vc-dir-tool-bar-map)
(if (boundp 'tool-bar-map)
(set (make-local-variable 'tool-bar-map) vc-dir-tool-bar-map))
(set (make-local-variable 'vc-client-mode) client-object)
(let ((buffer-read-only nil))
(erase-buffer)