diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-10-30 21:53:16 +0100 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-10-30 21:53:41 +0100 |
commit | ac52093e8b06724f7434899790ac9998aac54825 (patch) | |
tree | ae721085b445ffdf21ece8ccc986755d4b85c56a | |
parent | Remove 2 from style file name. (diff) | |
download | vimwiki-scripts-ac52093e8b06724f7434899790ac9998aac54825.tar.gz vimwiki-scripts-ac52093e8b06724f7434899790ac9998aac54825.tar.xz |
complete fromRight.
-rw-r--r-- | hs/Config.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/hs/Config.hs b/hs/Config.hs index 565f77b..f3c0d5b 100644 --- a/hs/Config.hs +++ b/hs/Config.hs @@ -70,6 +70,7 @@ etm (Left _) = Nothing etm (Right a) = Just a fromRight (Right x) = x +fromRight (Left _) = error "fromRight called on left value" parseURIs :: [(Text, String)] -> Map String URI parseURIs lst = lst & fmap (_2 %~ parseURI) |