diff options
author | Joey Hess <joey@kitenet.net> | 2010-10-12 17:26:34 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2010-10-12 17:26:34 -0400 |
commit | a36c39ad0af168259948a360087d2ff05df2857e (patch) | |
tree | 5b7080890ca8d1ea3712f2c25c4faa88f54711da /Backend.hs | |
parent | cad916d92695c7c04d3cdacbcd333a2dcd109d53 (diff) |
getting files via http working!
Diffstat (limited to 'Backend.hs')
-rw-r--r-- | Backend.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Backend.hs b/Backend.hs index 9d1b0cdbe..a16dfab6a 100644 --- a/Backend.hs +++ b/Backend.hs @@ -102,7 +102,7 @@ lookupKey state backend file = do k <- readFile (backendFile state backend file) return $ chomp k where - chomp s = if (endswith s "\n") + chomp s = if (endswith "\n" s) then (reverse . (drop 1) . reverse) s else s |