From c89872d393566ab414301cc84f30b8e8d08900b2 Mon Sep 17 00:00:00 2001
From: stuebinm
Date: Wed, 15 Dec 2021 23:06:42 +0100
Subject: suggest setting map meta properties if not given

---
 lib/Paths.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/Paths.hs')

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
-- 
cgit v1.2.3