FileApplicationNoteBook.st
changeset 15821 4cc5466ba247
parent 15815 480bea0caf0c
child 15825 462e872a3fb6
child 15908 80f06811ff1d
--- 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]