Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Fri, 18 May 2018 04:23:44 +0200
changeset 18133 a60d3e917481
parent 18132 0f8c19508a5e
child 18134 d345dd754f11
#REFACTORING by cg class: ChangesBrowser changed: #compressForClass:selector:
ChangesBrowser.st file | annotate | diff | comparison | revisions 
--- a/ChangesBrowser.st	Thu May 17 21:58:26 2018 +0200
+++ b/ChangesBrowser.st	Fri May 18 04:23:44 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1990 by Claus Gittinger
 	      All Rights Reserved
@@ -3748,7 +3746,7 @@
     "/ does not care for VW qualified names
     "/ ^ Parser parseExpression:text inNameSpace:nameSpace.
 
-    (text includesString:'§') ifTrue:[
+    (text includesString:'§') ifTrue:[
         self halt:'should no longer happen'
     ].
 
@@ -5577,7 +5575,7 @@
                                     classes at:changeNr put:thisClass.
                                     types at:changeNr put:#methodsFor
                                 ]
-                            ] on:Parser parseErrorSignal do:[:ex|
+                            ] on:ParseError do:[:ex|
                                 "ignore chunk"        
                                 ex return.
                             ].
@@ -5595,7 +5593,7 @@
                                 selectors at:changeNr put:(aParseTree arg1 value).
                                 classes at:changeNr put:thisClass.
                                 types at:changeNr put:#removeSelector
-                            ] on:Parser parseErrorSignal do:[:ex|
+                            ] on:ParseError do:[:ex|
                                 "ignore chunk"        
                                 ex return.
                             ].
@@ -6869,7 +6867,7 @@
     "
     clsName := nil.
 
-    (chunkText includesString:'§') ifTrue:[
+    (chunkText includesString:'§') ifTrue:[
         self halt:'should no longer happen'
     ].
hg/stx-libtool