CodeView.st
changeset 3291 ec6a99aad5e8
parent 3252 b44361e6b97a
child 3784 5e8b5e4102af
equal deleted inserted replaced
3290:963d2fe6530d 3291:ec6a99aad5e8
   108 cursorReturn
   108 cursorReturn
   109     |wasOn line newCol |
   109     |wasOn line newCol |
   110 
   110 
   111     "/ make Jan's enhancement dependent on
   111     "/ make Jan's enhancement dependent on
   112     "/ the st80EditMode-flag setting - to avoid confusing
   112     "/ the st80EditMode-flag setting - to avoid confusing
   113     "/ those who are used to the old nehavior.
   113     "/ those who are used to the old behavior.
   114     "/ for Jan: 
   114     "/ for Jan: 
   115     "/     st80EditMode is confgured in the settings-Editor dialog
   115     "/     st80EditMode is configured in the settings-Editor dialog
   116     "/ and saved/restored with the userPreferences.
   116     "/ and saved/restored with the userPreferences.
   117 
   117 
   118     (self st80EditMode not
   118     (self st80EditMode not
   119     or:[cursorLine == 1]) ifTrue:[
   119     or:[cursorLine == 1]) ifTrue:[
   120         super cursorReturn.
   120         super cursorReturn.
   318 ! !
   318 ! !
   319 
   319 
   320 !CodeView class methodsFor:'documentation'!
   320 !CodeView class methodsFor:'documentation'!
   321 
   321 
   322 version
   322 version
   323     ^ '$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.57 2006-02-01 13:26:13 cg Exp $'
   323     ^ '$Header: /cvs/stx/stx/libwidg/CodeView.st,v 1.58 2006-03-24 09:30:27 stefan Exp $'
   324 ! !
   324 ! !