WorkspaceApplication.st
changeset 8369 b06c42605499
parent 8350 642a6e1afcac
child 8384 07e86bfcfbba
equal deleted inserted replaced
8368:fd864b68c591 8369:b06c42605499
  1065     "launch a new workspace on the contents of some file"
  1065     "launch a new workspace on the contents of some file"
  1066 
  1066 
  1067     |ws|
  1067     |ws|
  1068 
  1068 
  1069     ws := self openWith:nil.
  1069     ws := self openWith:nil.
  1070     ws loadFile:aFilename.
  1070 
       
  1071     "/ let the ws load the file - instead of the caller.
       
  1072     "/ so the error dialog is shown in its context, 
       
  1073     "/ and the caller (Launcher) is not blocked.
       
  1074     ws enqueueDelayedAction:[ws loadFile:aFilename].
       
  1075 "/    ws loadFile:aFilename.
  1071     ^ ws
  1076     ^ ws
  1072 
  1077 
  1073     "
  1078     "
  1074      WorkspaceApplication openOnFile:'Makefile'
  1079      WorkspaceApplication openOnFile:'Makefile'
  1075     "
  1080     "
  2376 ! !
  2381 ! !
  2377 
  2382 
  2378 !WorkspaceApplication class methodsFor:'documentation'!
  2383 !WorkspaceApplication class methodsFor:'documentation'!
  2379 
  2384 
  2380 version
  2385 version
  2381     ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.163 2008-10-20 09:33:18 cg Exp $'
  2386     ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.164 2008-10-21 23:08:39 cg Exp $'
  2382 ! !
  2387 ! !