Tools__TagList.st
changeset 15168 89ee05d5d610
parent 15072 113054b443df
child 15220 56b706f31930
--- a/Tools__TagList.st	Mon Feb 02 09:33:40 2015 +0100
+++ b/Tools__TagList.st	Mon Feb 02 12:20:53 2015 +0100
@@ -3829,7 +3829,9 @@
         "/ new interface: block-arg to #changesFromStream:do: gets 3 args
         [
             ChangeSet::InvalidChangeChunkError handle:[:ex |
-                Dialog warn:('Error while processing changes - skipping: ' , aFilePath asFilename pathName).
+                Dialog warn:('TagList [info]: Error while processing changes in "%1":\\%2' withCRs
+                                bindWith:aFilePath asFilename pathName
+                                with: ex description).
             ] do:[
                 ChangeSet changesFromStream:s do:[:aChange :lNr :pos|
                     aChange isClassDefinitionChange ifTrue:[
@@ -3993,14 +3995,14 @@
 !TagList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.66 2014-12-23 17:07:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.67 2015-02-02 11:20:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.66 2014-12-23 17:07:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.67 2015-02-02 11:20:53 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__TagList.st,v 1.66 2014-12-23 17:07:24 cg Exp $'
+    ^ '$Id: Tools__TagList.st,v 1.67 2015-02-02 11:20:53 cg Exp $'
 ! !