mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-27 07:37:33 +00:00
Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-397
Work around vc-arch problems when building eshell 2004-06-10 Miles Bader <miles@gnu.ai.mit.edu> * lisp/eshell/esh-module.el (eshell-load-defgroups): Bind `vc-handled-backends' to nil when opening files.
This commit is contained in:
parent
48d67035ea
commit
0c2222fafb
@ -1,3 +1,8 @@
|
||||
2004-06-10 Miles Bader <miles@gnu.ai.mit.edu>
|
||||
|
||||
* eshell/esh-module.el (eshell-load-defgroups): Bind
|
||||
`vc-handled-backends' to nil when opening files.
|
||||
|
||||
2004-06-11 Juanma Barranquero <lektu@terra.es>
|
||||
|
||||
* files.el (parse-colon-path, cd): Doc fixes (refer to
|
||||
|
@ -1,6 +1,6 @@
|
||||
;;; esh-module.el --- Eshell modules
|
||||
|
||||
;; Copyright (C) 1999, 2000 Free Software Foundation
|
||||
;; Copyright (C) 1999, 2000, 2004 Free Software Foundation
|
||||
|
||||
;; Author: John Wiegley <johnw@gnu.org>
|
||||
;; Keywords: processes
|
||||
@ -41,6 +41,7 @@ customizing the variable `eshell-modules-list'."
|
||||
|
||||
(defun eshell-load-defgroups (&optional directory)
|
||||
"Load `defgroup' statements from Eshell's module files."
|
||||
(let ((vc-handled-backends nil)) ; avoid VC fucking things up
|
||||
(with-current-buffer
|
||||
(find-file-noselect (expand-file-name "esh-groups.el" directory))
|
||||
(erase-buffer)
|
||||
@ -66,7 +67,7 @@ customizing the variable `eshell-modules-list'."
|
||||
(if defgroup
|
||||
(insert defgroup "\n\n")))
|
||||
(setq files (cdr files))))
|
||||
(save-buffer)))
|
||||
(save-buffer))))
|
||||
|
||||
;; load the defgroup's for the standard extension modules, so that
|
||||
;; documentation can be provided when the user customize's
|
||||
|
Loading…
Reference in New Issue
Block a user