ASDF-INSTALL bugfix for logical pathnames

------=_20060120104814_85779
Content-Type: text/plain; charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

I'm using logical pathnames with asdf-install:*locations* and symlinks
were'nt getting created by INSTALL-PACKAGE in installer.lisp

My change to fix this problem is in the attached patch file.
------=_20060120104814_85779
Content-Type: text/x-patch; name="installer.lisp.patch"
Content-Disposition: attachment; filename="installer.lisp.patch"
Content-Transfer-Encoding: quoted-printable

*** installer.lisp	2006-01-20 07:15:43.840280576 -0500
--- installer-patch.lisp	2006-01-20 07:18:09.575125512 -0500
***************
*** 529,535 ****
  	  (merge-pathnames
  	   (make-pathname :directory
  			  `(:relative ,(subseq tar 0 pos-slash)))
! 	   source))
           )
      (princ tar)
      (loop for sysfile in (append
--- 529,535 ----
  	  (merge-pathnames
  	   (make-pathname :directory
  			  `(:relative ,(subseq tar 0 pos-slash)))
! 	   (truename source)))
           )
      (princ tar)
      (loop for sysfile in (append
***************
*** 547,553 ****
            (let ((target (merge-pathnames
                           (make-pathname :name (pathname-name sysfile)
                                          :type (pathname-type sysfile))
!                          system)))
              (when (probe-file target)
                (unlink-file target))
              (symlink-files sysfile target))
--- 547,553 ----
            (let ((target (merge-pathnames
                           (make-pathname :name (pathname-name sysfile)
                                          :type (pathname-type sysfile))
!                          (truename system))))
              (when (probe-file target)
                (unlink-file target))
              (symlink-files sysfile target))
------=_20060120104814_85779--



-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log files
for problems?  Stop!  Download the new AJAX search engine that makes
searching your log files as easy as surfing the  web.  DOWNLOAD SPLUNK!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=103432&bid=230486&dat=121642