Initialize CWD on startup.

This commit is contained in:
mainzelm 2001-09-12 14:29:03 +00:00
parent ebd33706cc
commit f3e567e997
2 changed files with 3 additions and 2 deletions

View File

@ -49,7 +49,8 @@
(lambda ()
(with-autoreaping
(lambda ()
(install-env)
(install-env)
(initialize-cwd)
(init-scsh-vars #f) ; Do it quietly.
(start args))))))
filename))

View File

@ -240,7 +240,7 @@
(with-autoreaping
(lambda ()
(install-env)
(initialize-cwd)
;; Have to do these before calling DO-SWITCHES, because actions
;; performed while processing the switches may use these guys.
(set-command-line-args!