Bonjour f.c.l.l,

Une petit problème qui me soucie depuis ce matin. Soit le code suivant:

(defparameter *root*
  (make-pathname :directory '(:relative ".data")))

(defparameter *wild*
  (merge-pathnames #p"**/*.*" *root*))

alors un appel à (directory *wild*) me donne ça:
==> (#P"/usr/home/giraud/.data/bar.dat"
     #P"/usr/home/giraud/.data/toto.dat")

Ma question est : comment obtenir le plus (or 'simplement 'élégamment)
une réponse avec des pathname relatif (i.e. #P".data/bar.dat")? J'ai
beau chercher dans les CLHS, je vois pas. (note : j'espère que ça ne
dépend pas de l'implém).

--
Manuel Giraud