--- a/FileApplicationNoteBook.st Fri Aug 28 15:49:36 2015 +0200
+++ b/FileApplicationNoteBook.st Fri Aug 28 15:49:57 2015 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 2002 by eXept Software AG
All Rights Reserved
@@ -938,6 +940,14 @@
]
!
+cursorLineAndColumnLabelHolder
+ ^ self
+ aspectFor:#cursorLineAndColumnLabelHolder
+ ifAbsent:[
+ IndirectValue for:(' ' asValue)
+ ]
+!
+
cursorLineLabelHolder
^ self
aspectFor:#cursorLineLabelHolder
@@ -1055,6 +1065,7 @@
self cursorLineLabelHolder valueHolder: (app cursorLineLabelHolder).
self cursorColLabelHolder valueHolder: (app cursorColLabelHolder).
+ self cursorLineAndColumnLabelHolder valueHolder: (app cursorLineAndColumnLabelHolder).
self modeLabelHolder valueHolder: (app modeLabelHolder).
self fileEncodingHolder valueHolder: (app fileEncodingHolder).
@@ -6088,6 +6099,10 @@
argument:editView cursorColHolder.
!
+cursorLineAndColumnLabelHolder
+ ^ editView cursorLineAndColumnLabelHolder.
+!
+
cursorLineLabelHolder
^ BlockValue
with:[:v | v printString]