Is the behavior implemented by the following patch what was really
intended by the April 23 change? One could, in addition to the patch
below, also change the `(concat dir initial)' into
`(expand-file-name initial dir)' which is probably more portable.
Note however that the _old_ (in fact _still present_, even though
maybe accidentally so) behavior, as documented in the Elisp manual
looks like it was implemented very intentionally.
===File ~/files.el-diff=====================================
*** files.el 06 May 2005 11:08:41 -0500 1.764
--- files.el 06 May 2005 20:47:00 -0500
***************
*** 543,553 ****
(setq dir default-directory))
(unless default-dirname
(setq default-dirname
! (if initial (concat dir initial) default-directory)))
! (read-file-name prompt dir (or default-dirname
! (if initial (expand-file-name initial dir)
! dir))
! mustmatch initial
'file-directory-p))
--- 543,550 ----
(setq dir default-directory))
(unless default-dirname
(setq default-dirname
! (if initial (concat dir initial) dir)))
! (read-file-name prompt dir default-dirname mustmatch initial
'file-directory-p))
============================================================
_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel
