<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; ">FYI...<br><div><br><div>Begin forwarded message:</div><br class="Apple-interchange-newline"><blockquote type="cite"><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px;"><span style="font-family:'Helvetica'; font-size:medium; color:rgba(0, 0, 0, 1);"><b>From: </b></span><span style="font-family:'Helvetica'; font-size:medium;">Faré <<a href="mailto:636506@bugs.launchpad.net">636506@bugs.launchpad.net</a>><br></span></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px;"><span style="font-family:'Helvetica'; font-size:medium; color:rgba(0, 0, 0, 1);"><b>Date: </b></span><span style="font-family:'Helvetica'; font-size:medium;">September 12, 2010 12:54:41 PM PDT<br></span></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px;"><span style="font-family:'Helvetica'; font-size:medium; color:rgba(0, 0, 0, 1);"><b>To: </b></span><span style="font-family:'Helvetica'; font-size:medium;"><a href="mailto:ron@flownet.com">ron@flownet.com</a><br></span></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px;"><span style="font-family:'Helvetica'; font-size:medium; color:rgba(0, 0, 0, 1);"><b>Subject: </b></span><span style="font-family:'Helvetica'; font-size:medium;"><b>[Bug 636506] Re: (truename #P"ccl:") fails when *default-pathname-defaults* is not empty</b><br></span></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px;"><span style="font-family:'Helvetica'; font-size:medium; color:rgba(0, 0, 0, 1);"><b>Reply-To: </b></span><span style="font-family:'Helvetica'; font-size:medium;">Bug 636506 <<a href="mailto:636506@bugs.launchpad.net">636506@bugs.launchpad.net</a>><br></span></div><br><div>Ouch. Committed 2.129 as a fix. I hope I won't be the one to release<br>2.009, though. I don't know what CCL does, but it's probably a CCL bug,<br>too.<br><br>Thanks for the report!<br><br>** Changed in: asdf<br>   Importance: Undecided => Medium<br><br>** Changed in: asdf<br>       Status: New => Fix Committed<br><br>** Changed in: asdf<br>    Milestone: None => version2.1<br><br>** Changed in: asdf<br>     Assignee: (unassigned) => Faré (fahree)<br><br>-- <br>(truename #P"ccl:") fails when *default-pathname-defaults* is not empty<br><a href="https://bugs.launchpad.net/bugs/636506">https://bugs.launchpad.net/bugs/636506</a><br>You received this bug notification because you are a direct subscriber<br>of the bug.<br><br>Status in Another System Definition Facility: Fix Committed<br><br>Bug description:<br>This is specific to Clozure CL.  The code for wrapping-output-translations contains the following line:<br><br>#+clozure (,(wilden (truename #p"ccl:")) ())<br><br>This fails when *default-pathname-defaults* is set to an absolute path with "Error: File #P"ccl:" does not exist."  This is arguably a bug in merge-pathnames, but it's arguable.  Because it's arguable, and because wrapping-output-translations only gets called once, I've been using the following workaround:<br><br>(let ((*default-pathname-defaults* nil)) (wrapping-output-translations))<br><br>in my ccl-init.lisp file.  Whether this is a good solution to the problem or just a Horrible hack I am not qualified to say because I don't understand what wrapping-output-translations is actually supposed to do.<br><br>To unsubscribe from this bug, go to:<br>https://bugs.launchpad.net/asdf/+bug/636506/+subscribe<br></div></blockquote></div><br></body></html>