StrongtalkSource/CommonProgEnvOutliner.dlt

   1 Delta define: #CommonProgEnvOutliner as: (\r
   2 (Class subclassOf: 'OutlinerApp mixin |> ProgrammingEnvironment' instanceVariables: '') abstract) !\r
   3 \r
   4 (Delta mirrorFor: #CommonProgEnvOutliner) revision: '$Revision: 1.19 $'!\r
   5 \r
   6 (Delta mirrorFor: #CommonProgEnvOutliner) group: 'outliner'!\r
   7 \r
   8 (Delta mirrorFor: #CommonProgEnvOutliner)\r
   9 comment: \r
  10 '(c) 1995-1997 Sun Microsystems, Inc. ALL RIGHTS RESERVED. \r
  11 Use and distribution of this software is subject to the terms of the attached source license.'!\r
  12 \r
  13 ! (Delta mirrorFor: #CommonProgEnvOutliner) methodsFor: 'toolbar' !\r
  14 \r
  15 \r
  16 buildFindButtons\r
  17 \r
  18         self toolBar\r
  19                 addButtonWithImageFrom: 'resources/open.bmp'\r
  20                                 action: [ :b <Button> | self findDefinition ];\r
  21                 yourself!\r
  22 \r
  23 buildToolBar\r
  24 \r
  25         self buildFindButtons.\r
  26         self toolBar addSpace.\r
  27         super buildToolBar.! !\r
  28 \r