Interval>>includes: fails if the increment is not 1. Here's code that works:
includes: aNumber
^self increment = 1
ifTrue: [aNumber between: self first and: self last]
ifFalse: [super includes: aNumber] "fall back to enumerate items"
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
merlyn@stonehenge.com URL:http://www.stonehenge.com/merlyn/
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!