Fix merging of ~/ pathnames.
authorStas Boukarev <stassats@gmail.com>
Sun, 10 Nov 2013 15:59:35 +0000 (19:59 +0400)
committerStas Boukarev <stassats@gmail.com>
Sun, 10 Nov 2013 15:59:35 +0000 (19:59 +0400)
commit772e2f4f22a7034fc6f9101d9f088163a0d32e77
tree402bf80cc7052422d614716d3d8807d3dde450c1
parent0e8649cf907d26f111864e4e29c7f9787828efbd
Fix merging of ~/ pathnames.

Don't merge the device component if the resulting pathname starts with
:absolute :home. The expansion of ~ may contain it's own device,
causing problems, especially on Windows, where
(merge-pathnames "~/") => c:C:\Users\user.
NEWS
src/code/target-pathname.lisp
tests/pathnames.impure.lisp