Tools_NavigationState.st
changeset 9564 ee5827388b2e
parent 9159 483f9635923b
child 10079 d93b4a7b0392
equal deleted inserted replaced
9563:2abe870b6f80 9564:ee5827388b2e
   405         ViewWithAcceptAndCancelBar notNil ifTrue:[
   405         ViewWithAcceptAndCancelBar notNil ifTrue:[
   406             v := ViewWithAcceptAndCancelBar new.
   406             v := ViewWithAcceptAndCancelBar new.
   407             v slaveView:aScrollableCodeView.
   407             v slaveView:aScrollableCodeView.
   408             v reallyModifiedHolder:self realModifiedStateHolder.
   408             v reallyModifiedHolder:self realModifiedStateHolder.
   409             v cancelAction:[
   409             v cancelAction:[
   410                     codeView setClipboardText:(codeView contents).   "/ for undo
   410                     "/ codeView setClipboardText:(codeView contents).   "/ for undo
       
   411                     codeView device rememberInCopyBufferHistory:(codeView contents).  "/ for undo
   411                     codeView application 
   412                     codeView application 
   412                         delayedUpdateCodeWithAutoSearch:false checkModified:false.
   413                         delayedUpdateCodeWithAutoSearch:false checkModified:false.
   413                     codeView requestFocus. 
   414                     codeView requestFocus. 
   414                 ].
   415                 ].
   415             v compareAction:[ 
   416             v compareAction:[ 
   419             aScrollableCodeView := v.
   420             aScrollableCodeView := v.
   420         ]
   421         ]
   421     ].
   422     ].
   422     ^ aScrollableCodeView
   423     ^ aScrollableCodeView
   423 
   424 
   424     "Modified: / 15-03-2007 / 16:26:33 / cg"
   425     "Modified: / 25-08-2010 / 22:04:07 / cg"
   425 !
   426 !
   426 
   427 
   427 specialEditorCanvasClassForResourceType:resourceTypeSymbol
   428 specialEditorCanvasClassForResourceType:resourceTypeSymbol
   428     resourceTypeSymbol == #fileImage ifTrue:[
   429     resourceTypeSymbol == #fileImage ifTrue:[
   429         ^ nil
   430         ^ nil
  1307 ! !
  1308 ! !
  1308 
  1309 
  1309 !NavigationState class methodsFor:'documentation'!
  1310 !NavigationState class methodsFor:'documentation'!
  1310 
  1311 
  1311 version
  1312 version
  1312     ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.32 2009-11-02 13:28:25 cg Exp $'
  1313     ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.33 2010-08-25 20:06:22 cg Exp $'
  1313 !
  1314 !
  1314 
  1315 
  1315 version_CVS
  1316 version_CVS
  1316     ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.32 2009-11-02 13:28:25 cg Exp $'
  1317     ^ '$Header: /cvs/stx/stx/libtool/Tools_NavigationState.st,v 1.33 2010-08-25 20:06:22 cg Exp $'
  1317 ! !
  1318 ! !