1
0
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:
Miles Bader 2004-06-11 03:52:53 +00:00
parent 48d67035ea
commit 0c2222fafb
2 changed files with 32 additions and 26 deletions

View File

@ -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

View File

@ -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