I will look at the code and see how it is used. I thought it was directly passed to open but now I see that the with-... macro is not a standard one. What about merging in a way that does not pass the extensions? What about<div>

<br></div><div>(merge-pathnames ,relative-path (make-pathname :name nil :type nil *this-file*))</div><div><br></div><div>instead of</div><div><br></div><div>(merge-pathnames ,relative-path *this-file*)<br><br clear="all">

Juanjo</div><div><br>-- <br>Instituto de Física Fundamental, CSIC<br>c/ Serrano, 113b, Madrid 28006 (Spain) <br><a href="http://juanjose.garciaripoll.googlepages.com" target="_blank">http://juanjose.garciaripoll.googlepages.com</a><br>



</div>