--- a/ListView.st Thu May 11 17:57:43 2017 +0200
+++ b/ListView.st Thu May 11 18:51:36 2017 +0200
@@ -899,24 +899,24 @@
characterAtLine:lineNr col:colNr
"return the character at physical line/col.
- The lineNr and colNr arguments start at 1, for the top-left cgaracter.
+ The lineNr and colNr arguments start at 1, for the top-left character.
Return a space character if nothing is there
(i.e. beyond the end of the line or below the last line)"
|line|
list notNil ifTrue:[
- line := self listAt:lineNr.
- line notNil ifTrue:[
- (line size >= colNr) ifTrue:[
- ^ line at:colNr
- ]
- ]
+ line := self listAt:lineNr.
+ line notNil ifTrue:[
+ (line size >= colNr) ifTrue:[
+ ^ line at:colNr
+ ]
+ ]
].
^ Character space
- "Created: 29.4.1996 / 12:11:00 / cg"
- "Modified: 29.4.1996 / 12:12:41 / cg"
+ "Created: / 29-04-1996 / 12:11:00 / cg"
+ "Modified (comment): / 11-05-2017 / 17:11:16 / stefan"
!
contents