diff options
Diffstat (limited to 'lang/sbcl/files/patch-contrib_asdf-install_installer.lisp')
| -rw-r--r-- | lang/sbcl/files/patch-contrib_asdf-install_installer.lisp | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/lang/sbcl/files/patch-contrib_asdf-install_installer.lisp b/lang/sbcl/files/patch-contrib_asdf-install_installer.lisp deleted file mode 100644 index 3a7c93b..0000000 --- a/lang/sbcl/files/patch-contrib_asdf-install_installer.lisp +++ /dev/null @@ -1,24 +0,0 @@ -Index: contrib/asdf-install/installer.lisp -=================================================================== -RCS file: /cvsroot/sbcl/sbcl/contrib/asdf-install/installer.lisp,v -retrieving revision 1.15 -diff -u -r1.15 installer.lisp ---- contrib/asdf-install/installer.lisp 12 Jan 2006 13:26:41 -0000 1.15 -+++ contrib/asdf-install/installer.lisp 16 Apr 2006 23:07:05 -0000 -@@ -264,11 +264,15 @@ - :wait t) - (error "can't untar")))) - (dummy (princ tar)) -+ (pos-start (if (and (>= (length tar) 2) -+ (string= (subseq tar 0 2) "x ")) -+ 2 ; bsdtar -+ 0)) ; GNU tar - (pos-slash (position #\/ tar)) - (*default-pathname-defaults* - (merge-pathnames - (make-pathname :directory -- `(:relative ,(subseq tar 0 pos-slash))) -+ `(:relative ,(subseq tar pos-start pos-slash))) - source))) - (declare (ignore dummy)) - (loop for asd in (directory |
