From: Doug Coleman <doug.coleman@gmail.com>
Date: Thu, 29 Jun 2023 23:43:31 +0000 (-0500)
Subject: tools.directory-to-file: use canonicalize-path
X-Git-Tag: 0.99~196
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=8a135d2f5e3aad8160ac01d6a187440190d79688

tools.directory-to-file: use canonicalize-path
---

diff --git a/extra/tools/directory-to-file/directory-to-file.factor b/extra/tools/directory-to-file/directory-to-file.factor
index 557e14176f..99668760bb 100644
--- a/extra/tools/directory-to-file/directory-to-file.factor
+++ b/extra/tools/directory-to-file/directory-to-file.factor
@@ -39,7 +39,7 @@ IN: tools.directory-to-file
     "\n\n;DIRECTORY>" surround ;
 
 : directory-to-file ( path -- )
-    [ directory-to-string ] keep ".modern" append
+    [ directory-to-string ] keep canonicalize-path ".modern" append
     utf8 set-file-contents ;
 
 : directory-to-file-main ( -- )