--- a/AbstractFileBrowser.st Mon Jun 08 18:40:57 2009 +0200
+++ b/AbstractFileBrowser.st Mon Jun 08 19:16:13 2009 +0200
@@ -5839,10 +5839,10 @@
self currentSelectedFiles do:[:fn |
|pkcs7SignedData signatureFilename|
- self notify:'Generating signature file for ', (fn baseName), '...'.
+ self notify:'Generating signed file from: ', (fn baseName), '...'.
pkcs7SignedData := Expecco::KeyFileGenerator new signExpeccoCode:fn contentsOfEntireFile.
- signatureFilename := fn addSuffix:'sig'.
+ signatureFilename := fn addSuffix:'signed'.
signatureFilename contents:pkcs7SignedData.
].
self notify:nil.
@@ -7793,5 +7793,5 @@
!AbstractFileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.409 2009-06-08 16:40:57 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.410 2009-06-08 17:16:13 stefan Exp $'
! !