equal
deleted
inserted
replaced
1252 lineBufferHistoryPosition := lineBufferHistoryPosition - 1. |
1252 lineBufferHistoryPosition := lineBufferHistoryPosition - 1. |
1253 ]. |
1253 ]. |
1254 "/ lastSelectedLineBufferHistoryPosition := lineBufferHistoryPosition. |
1254 "/ lastSelectedLineBufferHistoryPosition := lineBufferHistoryPosition. |
1255 p := lineBufferHistoryPosition. |
1255 p := lineBufferHistoryPosition. |
1256 [ |
1256 [ |
1257 lineBuffer := lineBufferHistory at:p. |
1257 lineBuffer := lineBufferHistory at:p ifAbsent:[nil]. |
1258 p := p - 1. |
1258 p := p - 1. |
1259 ] doUntil:[ |
1259 ] doUntil:[ |
1260 p == 0 or:[ lineBuffer notEmptyOrNil ] |
1260 p == 0 or:[ lineBuffer notEmptyOrNil ] |
1261 ]. |
1261 ]. |
1262 self insertStringAtCursor:lineBuffer. |
1262 self insertStringAtCursor:lineBuffer. |