on master help sign in
BuildWidthTable: wait until the table is built before we create the output path
commit107be324234de159ef101d9322bf4e54b9dbc6e6 authorJonathan Daugherty <cygnus@foobox.com> dateFri 6 Mar 2020, 09:35 (7 years ago) parentb5b980c
1 file changed+4−3
tools/BuildWidthTable.hs+4−3
tools/BuildWidthTable.hs+4−3
@@ -111,12 +111,13 @@ main = do
111111 exitFailure
112112 Just path -> return path
113113
114− let dir = takeDirectory outputPath
115− createDirectoryIfMissing True dir
116−
117114 putStrLn "Querying terminal:"
118115 builtTable <- buildUnicodeWidthTable $ configBound config
116+
117+ let dir = takeDirectory outputPath
118+ createDirectoryIfMissing True dir
119119 writeUnicodeWidthTable outputPath builtTable
120+
120121 putStrLn $ "\nOutput table written to " <> outputPath
121122
122123 when (configUpdate config) $ do