Hmm On Sun, Nov 01, 2009 at 10:15:36PM +0100, Salvatore Bonaccorso wrote: > Thus: What would be about the following? > ---(patch)-------------------------------------------------------------- > --- t/MyTestSpecific.pm (revision 46640) > +++ t/MyTestSpecific.pm (working copy) > @@ -26,6 +26,8 @@ > use GnuPG::Interface; > use GnuPG::Handles; > > +use Any::Moose; > + > use vars qw( @ISA @EXPORT > $stdin $stdout $stderr > $gpg_program $handles $gnupg > @@ -38,6 +40,11 @@ > texts file_match > ); > > +sub BUILD { > + my ( $self, $args ) = @_; > + $self->hash_init( meta_interactive => 0 ); > + $self->hash_init(%$args); > +} > > for my $gpg qw(gpg gpg2) { > my $gpg_find = "which $gpg"; > ------------------------------------------------------------------------
Hmm no this indeed will not work. I reverted my proposed patch in SVN. I'm in contact with Jesse, the upstream maintainer, let's see if he has some idea how this can be solved. Bests Salvatore
signature.asc
Description: Digital signature