summaryrefslogtreecommitdiff
path: root/lib/Hosts.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Hosts.hs')
-rw-r--r--lib/Hosts.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Hosts.hs b/lib/Hosts.hs
index 0f1d9a6..9d6ef92 100644
--- a/lib/Hosts.hs
+++ b/lib/Hosts.hs
@@ -79,7 +79,7 @@ parseLine s = (addr,names)
79 a <- fmap L.unpack $ listToMaybe addr0 79 a <- fmap L.unpack $ listToMaybe addr0
80 n <- inet_pton a 80 n <- inet_pton a
81 return $ n -- inet_ntop n 81 return $ n -- inet_ntop n
82 82
83 uncom s = fst $ L.break (=='#') s 83 uncom s = fst $ L.break (=='#') s
84 84
85empty :: Hosts 85empty :: Hosts
@@ -87,7 +87,7 @@ empty = Hosts { lineCount = 0
87 , numline = Map.empty 87 , numline = Map.empty
88 , addrnum = Map.empty 88 , addrnum = Map.empty
89 , namenum = Map.empty 89 , namenum = Map.empty
90 } 90 }
91 91
92{- 92{-
93parseHosts fname = do 93parseHosts fname = do