FilenameEditFieldV2.st
branchjv
changeset 16869 2ecababdd4c0
parent 15566 184cea584be5
parent 16862 ce13c7c3716a
child 18532 cccb41254edf
--- a/FilenameEditFieldV2.st	Mon Sep 19 08:48:45 2016 +0100
+++ b/FilenameEditFieldV2.st	Wed Sep 28 07:09:57 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$'
 ! !