3 "{ Package: 'stx:libview' }"

     1 "{ Package: 'stx:libview' }"

     4 

     2 

     5 "{ NameSpace: Smalltalk }"

     3 "{ NameSpace: Smalltalk }"

     6 

     4 

     7 SimpleBorder subclass:#MacFlatButtonBorder

     5 SimpleBorder subclass:#MacFlatButtonBorder