diff -ur --exclude '*~' archive_0.6.0.orig/tar.lisp archive_0.6.0/tar.lisp
--- archive_0.6.0.orig/tar.lisp	2007-07-21 16:00:28.000000000 -0500
+++ archive_0.6.0/tar.lisp	2007-07-28 00:43:04.000000000 -0500
@@ -353,7 +353,8 @@
                (setf (linkname entry) real-link-name)
                entry))
             ((or (= (typeflag entry) +tar-regular-file+)
-                 (= (typeflag entry) +tar-directory-file+))
+                 (= (typeflag entry) +tar-directory-file+)
+                 (= (typeflag entry) +tar-symbolic-link+))
              entry)
             (t
              (error "Can't understand typeflag: ~A" (typeflag entry))))))))