Tools__NewSystemBrowserCodeView.st
changeset 16798 128e6357bd79
parent 14596 d7265f2d768e
child 16799 64b592628518
child 16932 ee4386e43274
--- a/Tools__NewSystemBrowserCodeView.st	Tue Aug 09 12:51:03 2016 +0200
+++ b/Tools__NewSystemBrowserCodeView.st	Thu Aug 11 19:48:28 2016 +0200
@@ -896,11 +896,12 @@
 !
 
 selectorEmphasis
-    ^ highlightEmphasis 
-        ifNil:[ highlightEmphasis := Array with:#underline with:#bold ]
+    highlightEmphasis isNil ifTrue:[
+        highlightEmphasis := #(underline bold)
+    ].
+    ^ highlightEmphasis.
 
     "Created: / 25-12-2007 / 22:57:23 / janfrog"
-    "Modified: / 26-12-2007 / 11:16:14 / janfrog"
     "Modified: / 01-09-2009 / 22:29:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
@@ -1031,11 +1032,11 @@
 !NewSystemBrowserCodeView class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowserCodeView.st,v 1.15 2014-07-08 13:17:07 cg Exp $'
+    ^ '$Header$'
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowserCodeView.st,v 1.15 2014-07-08 13:17:07 cg Exp $'
+    ^ '$Id$'
 ! !