Skip to content
Browse files

Merge pull request #2 from fryguybob/master

Role can be empty
  • Loading branch information...
2 parents 3bb4994 + 0255cd0 commit 88933063f1208ba1bb94d342e11d1273297d330f @tonymorris committed Apr 6, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/Data/Geo/OSM/Member.hs
View
2 src/Data/Geo/OSM/Member.hs
@@ -21,7 +21,7 @@ data Member =
instance XmlPickler Member where
xpickle =
xpElem "member" (xpWrap (\(mtype', mref', mrole') -> member mtype' mref' mrole', \(Member mtype' mref' mrole') -> (mtype', mref', mrole'))
- (xpTriple xpickle (xpAttr "ref" xpText) (xpAttr "role" xpText)))
+ (xpTriple xpickle (xpAttr "ref" xpText) (xpAttr "role" xpText0)))
instance Show Member where
show =

0 comments on commit 8893306

Please sign in to comment.
Something went wrong with that request. Please try again.