#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Thu, 22 Sep 2016 15:10:44 +0200
changeset 16862 ce13c7c3716a
parent 16861 1f1c2aacd0ac
child 16863 d9e632f16155
#DOCUMENTATION by cg class: FilenameEditFieldV2 comment/format in: #initialText:selected: #realize
FilenameEditFieldV2.st
--- a/FilenameEditFieldV2.st	Thu Sep 22 15:08:23 2016 +0200
+++ b/FilenameEditFieldV2.st	Thu Sep 22 15:10:44 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2002 by eXept Software AG
               All Rights Reserved
@@ -11,6 +13,8 @@
 "
 "{ Package: 'stx:libtool' }"
 
+"{ NameSpace: Smalltalk }"
+
 ComboBoxView subclass:#FilenameEditFieldV2
 	instanceVariableNames:'directoriesOnly filesOnly directory acceptOnExpand activeMenu
 		completitionList'
@@ -122,8 +126,8 @@
 !
 
 initialText:aString selected:aBoolean
-    "move the cursor to the end - thats the most interesting part of
-     a filename
+    "redefined to move the cursor to the end 
+     - that's the most interesting part of a filename
     "
 
     super initialText:aString selected:aBoolean.
@@ -204,7 +208,8 @@
 !
 
 realize
-    "move the cursor to the end - thats the most interesting part of a filename
+    "redefined to move the cursor to the end 
+     - that's the most interesting part of a filename
     "
     super realize.
     self editor cursorToEndOfLine.
@@ -277,6 +282,6 @@
 !FilenameEditFieldV2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FilenameEditFieldV2.st,v 1.15 2014-02-18 14:39:34 stefan Exp $'
+    ^ '$Header$'
 ! !