diff options
| author | Andrew Innes | 2000-09-14 21:13:08 +0000 |
|---|---|---|
| committer | Andrew Innes | 2000-09-14 21:13:08 +0000 |
| commit | 1198514be7faa6b137174b8e4e5df117277ddf50 (patch) | |
| tree | 5a21cfdfd4806feeef48cfca38109250a0551f1f | |
| parent | 2a32b5ea15cb909f640d0aea331164bffd39658d (diff) | |
| download | emacs-1198514be7faa6b137174b8e4e5df117277ddf50.tar.gz emacs-1198514be7faa6b137174b8e4e5df117277ddf50.zip | |
Comment out before-init-hook function which resets
source-directory based; this breaks bootstrap.
| -rw-r--r-- | lisp/w32-fns.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/w32-fns.el b/lisp/w32-fns.el index d8a7858c90d..ea8f6ffbddd 100644 --- a/lisp/w32-fns.el +++ b/lisp/w32-fns.el | |||
| @@ -223,10 +223,10 @@ You should set this to t when using a non-system shell.\n\n")))) | |||
| 223 | ;;; source-directory, set it to something that is a reasonable approximation | 223 | ;;; source-directory, set it to something that is a reasonable approximation |
| 224 | ;;; on the user's machine. | 224 | ;;; on the user's machine. |
| 225 | 225 | ||
| 226 | (add-hook 'before-init-hook | 226 | ;(add-hook 'before-init-hook |
| 227 | '(lambda () | 227 | ; '(lambda () |
| 228 | (setq source-directory (file-name-as-directory | 228 | ; (setq source-directory (file-name-as-directory |
| 229 | (expand-file-name ".." exec-directory))))) | 229 | ; (expand-file-name ".." exec-directory))))) |
| 230 | 230 | ||
| 231 | ;; Avoid creating auto-save file names containing invalid characters. | 231 | ;; Avoid creating auto-save file names containing invalid characters. |
| 232 | (fset 'original-make-auto-save-file-name | 232 | (fset 'original-make-auto-save-file-name |