@@ -111,12 +111,13 @@ main = do
111 exitFailure
111 exitFailure
112 Just path -> return path
112 Just path -> return path
114− let dir = takeDirectory outputPath
115− createDirectoryIfMissing True dir
117 putStrLn "Querying terminal:"
114 putStrLn "Querying terminal:"
118 builtTable <- buildUnicodeWidthTable $ configBound config
115 builtTable <- buildUnicodeWidthTable $ configBound config
117+ let dir = takeDirectory outputPath
118+ createDirectoryIfMissing True dir
119 writeUnicodeWidthTable outputPath builtTable
119 writeUnicodeWidthTable outputPath builtTable
120 putStrLn $ "\nOutput table written to " <> outputPath
121 putStrLn $ "\nOutput table written to " <> outputPath
122 when (configUpdate config) $ do
123 when (configUpdate config) $ do