# HG changeset patch
# User Andrew Innes <andrewi@gnu.org>
# Date 968965988 0
# Node ID 4c03111f81aca86588960ab0eee137d4f9c38423
# Parent  ac11164b9357f2bdf806adadb46baaa8fd30ec7b
Comment out before-init-hook function which resets
source-directory based; this breaks bootstrap.

diff -r ac11164b9357 -r 4c03111f81ac lisp/w32-fns.el
--- a/lisp/w32-fns.el	Thu Sep 14 20:20:51 2000 +0000
+++ b/lisp/w32-fns.el	Thu Sep 14 21:13:08 2000 +0000
@@ -223,10 +223,10 @@
 ;;; source-directory, set it to something that is a reasonable approximation
 ;;; on the user's machine.
 
-(add-hook 'before-init-hook 
-	  '(lambda ()
-	     (setq source-directory (file-name-as-directory 
-				     (expand-file-name ".." exec-directory)))))
+;(add-hook 'before-init-hook 
+;	  '(lambda ()
+;	     (setq source-directory (file-name-as-directory 
+;				     (expand-file-name ".." exec-directory)))))
 
 ;; Avoid creating auto-save file names containing invalid characters.
 (fset 'original-make-auto-save-file-name