iglesias@orion.cf.uci.edu (Mike Iglesias) (05/11/89)
I found the cause of the problem with Emacs v18.54 on VMS that I
reported to gnu.emacs a few days ago. startup.el was changed to do a
getenv("PWD") between v18.52 and 18.54 (a fix for a symbolic link
problem) . On VMS this will return the definition of the logical name
PWD or the contents of the DCL symbol PWD. I have a symbol PWD that
is defined as SHOW DEFAULT, which is why the buffer's default
directory was getting changed to SHOW DEFAULT. It doesn't make sense
to do the added code in startup.el on VMS since getenv("PWD") can
return unpredictable results, so I changed startup.el as shown below.
Mike Iglesias
University of California, Irvine
*** startup.el Wed May 10 10:51:03 1989
--- startup.el_orig Wed May 10 10:51:08 1989
***************
*** 80,88
(message "Back to top level.")
(setq command-line-processed t)
;; In presence of symlinks, switch to cleaner form of default directory.
! (if (not (eq system-type 'vax-vms))
! (if (getenv "PWD")
! (setq default-directory (file-name-as-directory (getenv "PWD")))))
(unwind-protect
(command-line)
(and term-setup-hook
--- 80,87 -----
(message "Back to top level.")
(setq command-line-processed t)
;; In presence of symlinks, switch to cleaner form of default directory.
! (if (getenv "PWD")
! (setq default-directory (file-name-as-directory (getenv "PWD"))))
(unwind-protect
(command-line)
(and term-setup-hook