FilenameEditFieldV2.st
changeset 16862 ce13c7c3716a
parent 13956 70b04e6814ba
child 16869 2ecababdd4c0
child 18045 ad87b5ae1d07
--- 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$'
 ! !