There's an obvious bug in this method (second send of notNil)
It's in the Seaside-Pharo-Email package.
isIpAddress: aString
| ip |
ip := aString findTokens: '.'.
^ ip size = 4
and: [ ip allSatisfy: [ :each | each greaseInteger notNil
and: [ each greaseInteger notNil between: 0 and: 255] ] ]
should become:
isIpAddress: aString
| ip |
ip := aString findTokens: '.'.
^ ip size = 4
and: [ ip allSatisfy: [ :each | each greaseInteger notNil
and: [ each greaseInteger between: 0 and: 255] ] ]
Original issue reported on code.google.com by johanbri...@gmail.com on 24 Feb 2011 at 3:57
Original issue reported on code.google.com by
johanbri...@gmail.comon 24 Feb 2011 at 3:57