SystemBrowser.st
changeset 523 db2c1ad12524
parent 508 8d2ab732fca5
child 550 c8d443ad8a96
equal deleted inserted replaced
522:c67c64200411 523:db2c1ad12524
    94     ^ self openOnDevice:(Screen current) 
    94     ^ self openOnDevice:(Screen current) 
    95 
    95 
    96     "
    96     "
    97      SystemBrowser open
    97      SystemBrowser open
    98     "
    98     "
       
    99 !
       
   100 
       
   101 openInClass:aClass
       
   102     "launch a standard browser which immediately switches
       
   103      to aClass"
       
   104 
       
   105     ^ self openInClass:aClass selector:nil
       
   106 
       
   107     "
       
   108      SystemBrowser openInClass:Object
       
   109     "
       
   110 
       
   111     "Created: 30.4.1996 / 14:43:45 / cg"
    99 !
   112 !
   100 
   113 
   101 openInClass:aClass selector:aSelector
   114 openInClass:aClass selector:aSelector
   102     "launch a standard browser which immediately switches
   115     "launch a standard browser which immediately switches
   103      to aClass>>aSelector."
   116      to aClass>>aSelector."
  1267 ! !
  1280 ! !
  1268 
  1281 
  1269 !SystemBrowser class methodsFor:'documentation'!
  1282 !SystemBrowser class methodsFor:'documentation'!
  1270 
  1283 
  1271 version
  1284 version
  1272     ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.55 1996-04-25 16:28:37 cg Exp $'
  1285     ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.56 1996-04-30 13:00:55 cg Exp $'
  1273 ! !
  1286 ! !
  1274 SystemBrowser initialize!
  1287 SystemBrowser initialize!