[Seaside] [ANN] WACreditCard

[Ramon Leon]

> I reworked this from rubygems creditcard...
> 
> 
>     WACreditCard types.  #(#mastercard #visa #americanExpress 
> #dinersClub #enroute #discover #jcb #bankcard #switch #solo)
>        
>     (WACreditCard number: '5276 4400 6542 1319') isCreditCard.
>      
>     (WACreditCard number: '5276 4400 6542 1319') is: #mastercard.
> 
> The latest addition to the Jetsam package,
> 
> Installer ss project:'311'; install: 'Kernel-Extensions'.
> Installer ss project:'Jetsam'; install: 'Seaside28Jetsam'.
> 
> Or browse the package and just load the WACreditCard class
> 
> cheers
> 
> Keith

Isn't it a bit non idiomatic to have an instance of a class answer no to an
isClassType method?  Wouldn't isValid communicate the intent better than
isCreditCard?

Ramon Leon
http://onsmalltalk.com