[prev] [thread] [next] [lurker] [Date index for 2005/02/07]
Author: richardc
Date: 2005-02-07 20:22:07 +0000 (Mon, 07 Feb 2005)
New Revision: 1838
Added:
trunk/Siesta-Plugin-GPGList/t/
trunk/Siesta-Plugin-GPGList/t/config
trunk/Siesta-Plugin-GPGList/t/gpglist.t
trunk/Siesta-Plugin-GPGList/t/mgpg-test-key.pub.asc
trunk/Siesta-Plugin-GPGList/t/mgpg-test-key.sec.asc
trunk/Siesta-Plugin-GPGList/t/root/
trunk/Siesta-Plugin-GPGList/t/siesta.conf
Modified:
trunk/Siesta-Plugin-GPGList/lib/Siesta/Plugin/GPGList.pm
Log:
steal Mail::GPG::Test and a bit of the Siesta testing framework
Modified: trunk/Siesta-Plugin-GPGList/lib/Siesta/Plugin/GPGList.pm
===================================================================
--- trunk/Siesta-Plugin-GPGList/lib/Siesta/Plugin/GPGList.pm 2005-02-07 18:30:20 UTC (rev 1837)
+++ trunk/Siesta-Plugin-GPGList/lib/Siesta/Plugin/GPGList.pm 2005-02-07 20:22:07 UTC (rev 1838)
@@ -1,4 +1,3 @@
-
=head1 NAME
Siesta::Plugin::GPGList - try and do something 'clever' with gpg
@@ -26,7 +25,7 @@
package Siesta::Plugin::GPGList;
use strict;
use warnings;
-use Mail::GnuPG;
+use Mail::GPG;
use Siesta::Plugin;
use base qw( Siesta::Plugin );
our $VERSION = '0.02';
@@ -38,6 +37,8 @@
sub process {
my $self = shift;
my $mail = shift;
+ my $string = $mail->as_string;
+ my $entity = Mail::GPG->parse( mail_sref => \$string );
unless ($self->member) {
# okay, we're handling for the list
@@ -58,6 +59,7 @@
+
1;
__END__
Copied: trunk/Siesta-Plugin-GPGList/t/config (from rev 1832, trunk/siesta/t/config)
Added: trunk/Siesta-Plugin-GPGList/t/gpglist.t
===================================================================
--- trunk/Siesta-Plugin-GPGList/t/gpglist.t 2005-02-07 18:30:20 UTC (rev 1837)
+++ trunk/Siesta-Plugin-GPGList/t/gpglist.t 2005-02-07 20:22:07 UTC (rev 1838)
@@ -0,0 +1,8 @@
+#!perl -w
+use strict;
+use Test::More;
+use Mail::GPG::Test;
+use Siesta::Test 'init_db';
+
+my $mail_test = Mail::GPG::Test->new;
+$mail_test->init; # load up misc keys
Added: trunk/Siesta-Plugin-GPGList/t/mgpg-test-key.pub.asc
===================================================================
--- trunk/Siesta-Plugin-GPGList/t/mgpg-test-key.pub.asc 2005-02-07 18:30:20 UTC (rev 1837)
+++ trunk/Siesta-Plugin-GPGList/t/mgpg-test-key.pub.asc 2005-02-07 20:22:07 UTC (rev 1838)
@@ -0,0 +1,25 @@
+-----BEGIN PGP PUBLIC KEY BLOCK-----
+Version: GnuPG v1.0.6 (GNU/Linux)
+Comment: For info see http://www.gnupg.org
+
+mQGiBEAo9LsRBACvgzbs4W+ou1fXrp2AqEY3foNgwAEP7QGtWSWhN7baZkoBNQM6
+zT0Wg2dL/agalFgojcWOinIWOM174awqK6y35hOaXeVt+uHC3sBdGXHHceng6UUj
+sM7/UVcoNcmlKEF7Q/IiSnGncTZD+2IWjZVSjSjVqAc9r3J2/Ll9XCRBNwCgodTT
+HcEMU8d9r7TenYdJ8KPzWasD/2ilRSyJ56RTRrhOqmrIsh0Mmy5qX6ejamzLOW2L
+5kOQD1hYfa2xMWXaMxN2w9F7X4MqB4IkQlHDMc/3/gx9PhnxOocwejRsAtRetlzX
+YpDQMXLBs7h0Oa85Ys3kilYryiFMmeygZt2BPFmefTT+7pyb5F02BuupuRtURfIB
+6NNsA/9BxnuSR8YIfAlRHThjIGeJ7YQyE48KuQwBZfj/TktNIlY8MzWy/b5oOdej
+tIRO///QAFWxyQ249UbAJEyza5Tb8k8l1ufHIG+6KRpDtpyV2iBnJ9nftwddSg19
+WjS/jToIu9rIvnEhSFvOIFINXs9/KrAgWoyBXoHOHMvOKR9EzbQ0SsO2cm4gUmVk
+ZXIgTWFpbDo6R1BHIFRlc3QgS2V5IDxtYWlsZ3BnQGxvY2FsZG9tYWluPohXBBMR
+AgAXBQJAKPS7BQsHCgMEAxUDAgMWAgECF4AACgkQBi8A2uIPUDXVgwCgmBzZvEoP
+xi3IFJUwUqwaEhvdmpwAnRVsI+DBtnw8YPaZYWzKnr6fOSS1uQENBEAo9L0QBACm
+ZMc3mNCwevexiFHq0FVPAkaJCi/GhlUl/DMx6Heeu8U/116RdznSfPQQ5GlPh1Yn
+gHWBD1KubAN/4+uLeg8ue7NDUKAVeBXLX6qYUQGbtga4hoaN4jnwPO0q2Gfkc7SR
+1zuQ2hl4w3hpUMrhZ1EbZNZq7/2aCAOx906g4H3shwADBQP/QhzS8lqigsygcYCE
+fNsuvKqexEwUFNQbpq0fzy5OQWT9X1bfYtyS37AKbWPngZtYY6PV9pXTDrgVbOel
+Lnz0otqaDR9FUtKpNISq42zNNRHvW9vxBh+mUxtdO1glsLDnDpMp9a1sxUljk6om
+aQStYN8q7U2H2xZVAeR2VU7sWeWIRgQYEQIABgUCQCj0vQAKCRAGLwDa4g9QNbvy
+AKCODf8E/QqtIYQEvnUk48QL7M9ozQCgnKlhtkFK0bYGhN2NEKo8mcdDUpo=
+=xm4j
+-----END PGP PUBLIC KEY BLOCK-----
Added: trunk/Siesta-Plugin-GPGList/t/mgpg-test-key.sec.asc
===================================================================
--- trunk/Siesta-Plugin-GPGList/t/mgpg-test-key.sec.asc 2005-02-07 18:30:20 UTC (rev 1837)
+++ trunk/Siesta-Plugin-GPGList/t/mgpg-test-key.sec.asc 2005-02-07 20:22:07 UTC (rev 1838)
@@ -0,0 +1,34 @@
+-----BEGIN PGP PRIVATE KEY BLOCK-----
+Version: GnuPG v1.0.6 (GNU/Linux)
+Comment: For info see http://www.gnupg.org
+
+lQHPBEAo9LsRBACvgzbs4W+ou1fXrp2AqEY3foNgwAEP7QGtWSWhN7baZkoBNQM6
+zT0Wg2dL/agalFgojcWOinIWOM174awqK6y35hOaXeVt+uHC3sBdGXHHceng6UUj
+sM7/UVcoNcmlKEF7Q/IiSnGncTZD+2IWjZVSjSjVqAc9r3J2/Ll9XCRBNwCgodTT
+HcEMU8d9r7TenYdJ8KPzWasD/2ilRSyJ56RTRrhOqmrIsh0Mmy5qX6ejamzLOW2L
+5kOQD1hYfa2xMWXaMxN2w9F7X4MqB4IkQlHDMc/3/gx9PhnxOocwejRsAtRetlzX
+YpDQMXLBs7h0Oa85Ys3kilYryiFMmeygZt2BPFmefTT+7pyb5F02BuupuRtURfIB
+6NNsA/9BxnuSR8YIfAlRHThjIGeJ7YQyE48KuQwBZfj/TktNIlY8MzWy/b5oOdej
+tIRO///QAFWxyQ249UbAJEyza5Tb8k8l1ufHIG+6KRpDtpyV2iBnJ9nftwddSg19
+WjS/jToIu9rIvnEhSFvOIFINXs9/KrAgWoyBXoHOHMvOKR9Ezf8DAwLEq8ecp7sI
+02A50MhQ7eA06YsmSIFN9QTnA+wCpuew+EgrampxIKFEi/0mIzpEU0FfZmFjdG9y
+OgAAr3Sgvz+J3dshHIDRhTVnYL2aPlvNnJ/9JiM6RFNBX2ZhY3RvcjoAAK9AnQvU
+3EZOOHxqrXm3XV7050rwyY/v/SYjOkRTQV9mYWN0b3I6AACvemZd9XutloxZrRRa
+ic8Q9GZfTgXEdbQ0SsO2cm4gUmVkZXIgTWFpbDo6R1BHIFRlc3QgS2V5IDxtYWls
+Z3BnQGxvY2FsZG9tYWluPohXBBMRAgAXBQJAKPS7BQsHCgMEAxUDAgMWAgECF4AA
+CgkQBi8A2uIPUDXVgwCghoFY9o6PAVRzRJMqDiA6esP6IZ0AoJsRq67daRXwz6O+
+xvjXp4qK2SP4nQFGBEAo9L0QBACmZMc3mNCwevexiFHq0FVPAkaJCi/GhlUl/DMx
+6Heeu8U/116RdznSfPQQ5GlPh1YngHWBD1KubAN/4+uLeg8ue7NDUKAVeBXLX6qY
+UQGbtga4hoaN4jnwPO0q2Gfkc7SR1zuQ2hl4w3hpUMrhZ1EbZNZq7/2aCAOx906g
+4H3shwADBQP/QhzS8lqigsygcYCEfNsuvKqexEwUFNQbpq0fzy5OQWT9X1bfYtyS
+37AKbWPngZtYY6PV9pXTDrgVbOelLnz0otqaDR9FUtKpNISq42zNNRHvW9vxBh+m
+UxtdO1glsLDnDpMp9a1sxUljk6omaQStYN8q7U2H2xZVAeR2VU7sWeX/AwMCxKvH
+nKe7CNNgFYOJOFhdQ93jhEEG0i046GUlkYT9yaVXbVPHDSMeaNsrWma8cPGcku/G
+ns39JiM6RUxHX2ZhY3RvcjoAAKsFhhMR1wh1aZlz1fNCUq8Xx3QC4g5l/SYjOkVM
+R19mYWN0b3I6AACrBGP29egyMbmsiGmipCFdUf51674Nj/0mIzpFTEdfZmFjdG9y
+OgAAqwUd62UcP4B9hMXCU4pfw6ihY4eFw6f9JiM6RUxHX2ZhY3RvcjoAAKsGsRcZ
+xtt9iQmoPcgOKhohGVXRkrtT/SYjOkVMR19mYWN0b3I6AACrB4UjeJg8rxADcw/0
+lLOs1gA1jBQKhYhGBBgRAgAGBQJAKPS9AAoJEAYvANriD1A1u/IAnA5wjKK3QYId
+Vfx39pCuWnv/xOUyAJ0eXrt1s25Z2bFbHcXUh+IO41bCmg==
+=34yv
+-----END PGP PRIVATE KEY BLOCK-----
Copied: trunk/Siesta-Plugin-GPGList/t/siesta.conf (from rev 1832, trunk/siesta/t/siesta.conf)
Generated at 12:00 on 08 Feb 2005 by mariachi 0.52