DebugView.st
changeset 14559 1de1084ebbd9
parent 14532 72c1d3cae279
child 14608 948821582e7f
equal deleted inserted replaced
14558:40683cf4fe03 14559:1de1084ebbd9
  5558 
  5558 
  5559     "Modified: / 12-09-2006 / 17:20:38 / cg"
  5559     "Modified: / 12-09-2006 / 17:20:38 / cg"
  5560 !
  5560 !
  5561 
  5561 
  5562 openSettingsDialog
  5562 openSettingsDialog
  5563     |settingsList settingsApp|
  5563     |settingsList|
  5564 
  5564 
  5565     settingsList :=
  5565     settingsList :=
  5566         #(
  5566         #(
  5567            #('Debugger'       #'AbstractSettingsApplication::DebuggerSettingsAppl'            )
  5567            #('Debugger'       #'AbstractSettingsApplication::DebuggerSettingsAppl'            )
  5568            #('Editor'         #'AbstractSettingsApplication::EditSettingsAppl'                )
  5568            #('Editor'         #'AbstractSettingsApplication::EditSettingsAppl'                )
  5569            #('Syntax Color'   #'AbstractSettingsApplication::SyntaxColorSettingsAppl'         )
  5569            #('Syntax Color'   #'AbstractSettingsApplication::SyntaxColorSettingsAppl'         )
  5570            #('Code Format'    #'AbstractSettingsApplication::SourceCodeFormatSettingsAppl'    )
  5570            #('Code Format'    #'AbstractSettingsApplication::SourceCodeFormatSettingsAppl'    )
  5571         ).
  5571         ).
  5572 
  5572 
  5573     settingsApp := SettingsDialog new.
  5573     SettingsDialog 
  5574     "/ settingsApp requestor:self.
  5574         openWithList:settingsList 
  5575     settingsApp installSettingsEntries:settingsList.
  5575         label:(resources string:'Debugger Settings').
  5576     settingsApp allButOpen.
       
  5577     settingsApp window label:('Debugger Settings').
       
  5578     settingsApp openWindow.
       
  5579 !
  5576 !
  5580 
  5577 
  5581 processesApplication
  5578 processesApplication
  5582     "if the debugged process is a GUI process,
  5579     "if the debugged process is a GUI process,
  5583      AND it has an applicaiton, return it.
  5580      AND it has an applicaiton, return it.
  9207 ! !
  9204 ! !
  9208 
  9205 
  9209 !DebugView class methodsFor:'documentation'!
  9206 !DebugView class methodsFor:'documentation'!
  9210 
  9207 
  9211 version
  9208 version
  9212     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.658 2014-06-23 08:58:57 cg Exp $'
  9209     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.659 2014-07-01 20:01:16 cg Exp $'
  9213 !
  9210 !
  9214 
  9211 
  9215 version_CVS
  9212 version_CVS
  9216     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.658 2014-06-23 08:58:57 cg Exp $'
  9213     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.659 2014-07-01 20:01:16 cg Exp $'
  9217 !
  9214 !
  9218 
  9215 
  9219 version_SVN
  9216 version_SVN
  9220     ^ '$Id: DebugView.st,v 1.658 2014-06-23 08:58:57 cg Exp $'
  9217     ^ '$Id: DebugView.st,v 1.659 2014-07-01 20:01:16 cg Exp $'
  9221 ! !
  9218 ! !
  9222 
  9219 
  9223 
  9220 
  9224 DebugView initialize!
  9221 DebugView initialize!