projects
/
pdns-pipe-nmc.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
978ad28
)
fixme note about splitting subdoms
author
Eugene Crosser
<crosser@average.org>
Sat, 3 May 2014 10:48:01 +0000
(14:48 +0400)
committer
Eugene Crosser
<crosser@average.org>
Sat, 3 May 2014 10:48:01 +0000
(14:48 +0400)
NmcDom.hs
patch
|
blob
|
history
diff --git
a/NmcDom.hs
b/NmcDom.hs
index 4887ab7290a3e40c5dc4714ced2019896e9b381e..bcbfcd39a3dd2c08463cb273df0e55304432932f 100644
(file)
--- a/
NmcDom.hs
+++ b/
NmcDom.hs
@@
-74,7
+74,7
@@
makeSubmap :: Object -> Parser (Maybe (Map String NmcDom))
makeSubmap o = ((.).(.)) merge merge <$> takeTls o <*> takeSrv o <*> takeMap o
takeMap :: Object -> Parser (Maybe (Map String NmcDom))
-takeMap o = o .:? "map"
+takeMap o = o .:? "map"
-- FIXME split over dots here
takeSrv :: Object -> Parser (Maybe (Map String NmcDom))
takeSrv o =