# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 905522255 -7200
# Node ID 75149fa16b10e4a87eae82a93d6d79edb7309a9c
# Parent  ff43258f22247219d7fd05a72a58772ee6f308da
oops - leftover halt removed.

diff -r ff43258f2224 -r 75149fa16b10 FSelBox.st
--- a/FSelBox.st	Fri Sep 11 15:55:32 1998 +0200
+++ b/FSelBox.st	Fri Sep 11 15:57:35 1998 +0200
@@ -594,7 +594,6 @@
     string := enterField contents.
     (string notNil and:[string notEmpty]) ifTrue:[
         string := string withoutSeparators.
-self halt.
         string asFilename isAbsolute ifTrue:[
             fname := string asFilename
         ] ifFalse:[
@@ -616,7 +615,7 @@
 
     super okPressed
 
-    "Modified: / 9.9.1998 / 21:21:14 / cg"
+    "Modified: / 10.9.1998 / 22:19:11 / cg"
 !
 
 patternChanged
@@ -645,5 +644,5 @@
 !FileSelectionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/FSelBox.st,v 1.54 1998-09-09 20:35:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/FSelBox.st,v 1.55 1998-09-11 13:57:35 cg Exp $'
 ! !
diff -r ff43258f2224 -r 75149fa16b10 FileSelectionBox.st
--- a/FileSelectionBox.st	Fri Sep 11 15:55:32 1998 +0200
+++ b/FileSelectionBox.st	Fri Sep 11 15:57:35 1998 +0200
@@ -594,7 +594,6 @@
     string := enterField contents.
     (string notNil and:[string notEmpty]) ifTrue:[
         string := string withoutSeparators.
-self halt.
         string asFilename isAbsolute ifTrue:[
             fname := string asFilename
         ] ifFalse:[
@@ -616,7 +615,7 @@
 
     super okPressed
 
-    "Modified: / 9.9.1998 / 21:21:14 / cg"
+    "Modified: / 10.9.1998 / 22:19:11 / cg"
 !
 
 patternChanged
@@ -645,5 +644,5 @@
 !FileSelectionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.54 1998-09-09 20:35:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionBox.st,v 1.55 1998-09-11 13:57:35 cg Exp $'
 ! !