class: Tools::NewSystemBrowser
authorClaus Gittinger <cg@exept.de>
Thu, 12 Sep 2013 19:02:08 +0200
changeset 13549 68eb851319ac
parent 13548 dc78ae8a04d0
child 13550 66392d50551a
class: Tools::NewSystemBrowser changed: #createPatchFileForDiffSet:checkingForVersionBefore:
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Thu Sep 12 15:07:13 2013 +0200
+++ b/Tools__NewSystemBrowser.st	Thu Sep 12 19:02:08 2013 +0200
@@ -34345,7 +34345,7 @@
     tempStream nextPutLine:('"/ first, a guard, to ignore the patch if the library already contains an up-to-date class:').
     tempStream nextPutLine:('"/').
     changedOwningClasses do:[:eachClass |
-        tempStream nextPutLine:('(AbstractSourceCodeManager isRevision:(%2 revision) sameOrAfter:''%1'') ifTrue:[ AbortSignal raise ].'
+        tempStream nextPutLine:('(AbstractSourceCodeManager isRevision:(%2 revision) sameOrAfter:''%1'') ifTrue:[ AbortSignal raiseErrorString:''patch is for older version'' ].'
                             bindWith:eachClass revision
                             with:eachClass name).
     ].
@@ -59155,11 +59155,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1981 2013-09-10 14:01:07 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1982 2013-09-12 17:02:08 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1981 2013-09-10 14:01:07 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1982 2013-09-12 17:02:08 cg Exp $'
 !
 
 version_HG
@@ -59168,7 +59168,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st,v 1.1981 2013-09-10 14:01:07 vrany Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st,v 1.1982 2013-09-12 17:02:08 cg Exp $'
 ! !