AbstractLauncherApplication.st
changeset 14086 f05ca0ec3ea8
parent 14075 710990d62d23
child 14104 4d926da55a90
--- a/AbstractLauncherApplication.st	Sat Mar 01 18:55:22 2014 +0100
+++ b/AbstractLauncherApplication.st	Sat Mar 01 23:45:47 2014 +0100
@@ -6400,7 +6400,7 @@
 
     syntaxColoringBox := box addComboListOn: (syntaxColors := SelectionInList with:UserPreferences syntaxColorNames initialSelection:1).
     syntaxColorSelector    := [(syntaxColors selection replChar:$  withString: '') asLowercaseFirst asSymbol].
-    syntaxEmphasisSelector := [((syntaxColorSelector value readStream upToAll: 'Color'), 'Emphasis') asLowercaseFirst asSymbol].
+    syntaxEmphasisSelector := [((syntaxColorSelector value upToAll: 'Color'), 'Emphasis') asLowercaseFirst asSymbol].
     syntaxColor := (currentUserPrefs perform: syntaxColorSelector value) asValue.
     colorMenu := ColorMenu new.
     colorMenu model: syntaxColor.
@@ -6947,14 +6947,14 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.449 2014-02-28 12:58:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.450 2014-03-01 22:45:47 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.449 2014-02-28 12:58:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.450 2014-03-01 22:45:47 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: AbstractLauncherApplication.st,v 1.449 2014-02-28 12:58:37 cg Exp $'
+    ^ '$Id: AbstractLauncherApplication.st,v 1.450 2014-03-01 22:45:47 cg Exp $'
 ! !