equal
deleted
inserted
replaced
820 Transcript showCR:'#' , aSelector , ' skipped - already implemented in the class' |
820 Transcript showCR:'#' , aSelector , ' skipped - already implemented in the class' |
821 ] |
821 ] |
822 ] |
822 ] |
823 ] ifFalse:[ |
823 ] ifFalse:[ |
824 aListOfSelectors do:[:aSelector| |
824 aListOfSelectors do:[:aSelector| |
825 (aSelector isArray or:[aClass canUnderstand:aSelector]) ifFalse:[ |
825 aSelector isArray ifFalse:[ |
826 aBlock value:aSelector |
826 (aClass canUnderstand:aSelector) ifFalse:[ |
827 ] ifTrue:[ |
827 aBlock value:aSelector |
828 Transcript showCR:'#' , aSelector , ' skipped - already implemented in the class (or superclass)' |
828 ] ifTrue:[ |
|
829 Transcript showCR:'#' , aSelector , ' skipped - already implemented in the class (or superclass)' |
|
830 ] |
829 ] |
831 ] |
830 ] |
832 ] |
831 ] |
833 ] |
832 |
834 |
833 |
835 |