Update write-release-index for symlinks

Shirakumo · Apr 7, 2024 · a7b4c73 · a7b4c73
1 parent 04f8a9b
commit a7b4c73
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/compile.lisp b/compile.lisp
@@ -39,8 +39,9 @@ available-versions-url: ~a"
               (archive-md5 project)
               (source-sha1 project)
               (prefix project)
-              (remove-duplicates (loop for system in (systems project) collect (enough-namestring (file system)
-                                                                                                  (source-directory (project project))))
+              (remove-duplicates (loop for system in (systems project)
+                                       collect (enough-namestring (truename (file system))
+                                                                  (truename (source-directory (project project)))))
                                  :test #'string=)))))
 
 (defun write-system-index (release stream)