--- a/MCRepositoryBrowser.st Tue Apr 02 21:24:41 2013 +0200
+++ b/MCRepositoryBrowser.st Tue Apr 02 21:28:18 2013 +0200
@@ -1195,7 +1195,12 @@
self withWaitCursorDo:[
selectedVersionDetailsHolder value:'Reading ',versionEntry name,'...'.
- version := versionEntry asMCVersion.
+ ZipArchive zipFileFormatErrorSignal handle:[:ex |
+ (Dialog confirm:'Zipfile format error encountered while reading (corrupt file?).\\Debug?' withCRs)
+ ifTrue:[ex reject].
+ ] do:[
+ version := versionEntry asMCVersion.
+ ].
version ifNotNil:[
selectedVersionDetailsHolder value: version summary
]
@@ -1209,11 +1214,11 @@
!MCRepositoryBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.24 2013-03-30 22:27:12 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.25 2013-04-02 19:28:18 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.24 2013-03-30 22:27:12 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.25 2013-04-02 19:28:18 cg Exp $'
!
version_SVN