[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: read-directory-name
From: |
Luc Teirlinck |
Subject: |
Re: read-directory-name |
Date: |
Fri, 6 May 2005 21:34:29 -0500 (CDT) |
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))
============================================================
Re: read-directory-name, Richard Stallman, 2005/05/08