equal
deleted
inserted
replaced
5837 |
5837 |
5838 self withActivityIndicationDo:[ |
5838 self withActivityIndicationDo:[ |
5839 self currentSelectedFiles do:[:fn | |
5839 self currentSelectedFiles do:[:fn | |
5840 |pkcs7SignedData signatureFilename| |
5840 |pkcs7SignedData signatureFilename| |
5841 |
5841 |
5842 self notify:'Generating signature file for ', (fn baseName), '...'. |
5842 self notify:'Generating signed file from: ', (fn baseName), '...'. |
5843 |
5843 |
5844 pkcs7SignedData := Expecco::KeyFileGenerator new signExpeccoCode:fn contentsOfEntireFile. |
5844 pkcs7SignedData := Expecco::KeyFileGenerator new signExpeccoCode:fn contentsOfEntireFile. |
5845 signatureFilename := fn addSuffix:'sig'. |
5845 signatureFilename := fn addSuffix:'signed'. |
5846 signatureFilename contents:pkcs7SignedData. |
5846 signatureFilename contents:pkcs7SignedData. |
5847 ]. |
5847 ]. |
5848 self notify:nil. |
5848 self notify:nil. |
5849 ] |
5849 ] |
5850 ! |
5850 ! |
7791 ! ! |
7791 ! ! |
7792 |
7792 |
7793 !AbstractFileBrowser class methodsFor:'documentation'! |
7793 !AbstractFileBrowser class methodsFor:'documentation'! |
7794 |
7794 |
7795 version |
7795 version |
7796 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.409 2009-06-08 16:40:57 stefan Exp $' |
7796 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.410 2009-06-08 17:16:13 stefan Exp $' |
7797 ! ! |
7797 ! ! |