diff options
author | stuebinm | 2021-12-15 23:06:42 +0100 |
---|---|---|
committer | stuebinm | 2021-12-15 23:06:42 +0100 |
commit | c89872d393566ab414301cc84f30b8e8d08900b2 (patch) | |
tree | 711b1dea5d24aa83ea73b2ac51083059a1e4ece9 /lib/Paths.hs | |
parent | 417087b147e193a92b21afa2932c367c42aab25b (diff) |
suggest setting map meta properties if not given
Diffstat (limited to 'lib/Paths.hs')
-rw-r--r-- | lib/Paths.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Paths.hs b/lib/Paths.hs index 83c065f..99774c5 100644 --- a/lib/Paths.hs +++ b/lib/Paths.hs @@ -67,7 +67,7 @@ isOldStyle :: RelPath -> Bool isOldStyle (Path _ text frag) = path =~ ("{<.+>*}" :: Text) where path = case frag of Just f -> text <> f - _ -> text + _ -> text getExtension :: RelPath -> Text getExtension (Path _ text frag) = case length splitted of |