bad pathname in source note

[rme]

Create file ~/test.lisp:

(defun junk (x  y)
  (list x y))

Welcome to Clozure Common Lisp Version 1.3-dev-r11972M-trunk  (DarwinX8632)!
? (load "/Users/rme/test")
#P"/Users/rme/test.lisp"
? (find-definition-sources 'junk)
(((#<FUNCTION-DEFINITION-TYPE FUNCTION #x87909FE> . JUNK) #<SOURCE-NOTE "home:test..newest":0-32 NIL>))

Note incorrect pathname in source-note. This doesn't happen when loading with (load "home:test").

[gb]

I likely broke this when fixing an obscure pathname bug a month or so ago; will fix.

[rme]

fixed in trunk by r11988