hs-GeoIP 0.2 → 0.3

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

• hs-GeoIP.cabal +1/−1
• src/Data/Geolocation/GeoIP.hsc +1/−1

@@ -1,5 +1,5 @@ Name:                hs-GeoIP-Version:             0.2+Version:             0.3 Synopsis:            Haskell bindings to the MaxMind GeoIPCity database via the C library License:             BSD3 License-file:        LICENSE

@@ -87,7 +87,7 @@           <*> fmap tofloat (#{peek GeoIPRecord, longitude} p)           <*> fmap toInt (#{peek GeoIPRecord, area_code} p)           <*> peekBS (#{peek GeoIPRecord, continent_code})-          <*> fmap toInt (#{peek GeoIPRecord, accuracy_radius} p)+          <*> pure 0     peekBS f = do       !sptr <- f p       case nullPtr == sptr of