Re: Fwd: vc-svn.el and "the underscore hack"

[David Kastrup]

Kevin Rodgers <address@hidden> writes:

> Wouldn't it be simpler and more reliable to change
>
> (when (file-readable-p (expand-file-name ".svn" FILE))
>   ;; refer to (expand-file-name ".svn" FILE) here
>   ...)
>
> to
>
> (let (svn-file)
>   (cond ((file-readable-p (setq svn-file (expand-file-name ".svn" FILE))))
>       ((file-readable-p (setq svn-file (expand-file-name "_svn" FILE))))
>       (t (setq svn-file nil)))
>   (when svn-file
>     ;; refer to svn-file here
>     ...))
>
> and similarly for the file-directory-p and vc-insert-file calls?

Does either work under VMS where `expand-file-name' does a different
string manipulation than with Unix?

-- 
David Kastrup, Kriemhildstr. 15, 44793 Bochum