[openpgp-applet] 18/61: Follow some Test::Perl::Critic recommandations
Clement Hermann
nodens at nodens.org
Tue Aug 18 18:51:41 UTC 2015
This is an automated email from the git hooks/post-receive script.
nodens-guest pushed a commit to annotated tag OpenPGP_Applet-0.9
in repository openpgp-applet.
commit 7c91bd2ed07a6a6f1be44f55f45e60ae3702a03f
Author: Clément Hermann (nodens) <nodens at nodens.org>
Date: Fri Aug 8 15:29:07 2014 +0200
Follow some Test::Perl::Critic recommandations
---
bin/openpgp-applet | 2 +-
lib/OpenPGP_Applet/GnuPG/Interface.pm | 1 +
2 files changed, 2 insertions(+), 1 deletion(-)
diff --git a/bin/openpgp-applet b/bin/openpgp-applet
index a0c3fd9..1416a43 100755
--- a/bin/openpgp-applet
+++ b/bin/openpgp-applet
@@ -309,7 +309,7 @@ sub set_clipboards_text {
$_->set_text($encoded_text);
}
# GTK fails setting the primary selection above, so let's use xclip :/
- open(my $xclip, '| xclip') or die "Error opening pipe to xclip";
+ open(my $xclip, '|-', 'xclip') or die "Error opening pipe to xclip";
print $xclip $encoded_text or die "Error copying data to X clipboard";
close $xclip or die "Error closing pipe to xclip";
}
diff --git a/lib/OpenPGP_Applet/GnuPG/Interface.pm b/lib/OpenPGP_Applet/GnuPG/Interface.pm
index c29c325..7519393 100644
--- a/lib/OpenPGP_Applet/GnuPG/Interface.pm
+++ b/lib/OpenPGP_Applet/GnuPG/Interface.pm
@@ -1,4 +1,5 @@
package OpenPGP_Applet::GnuPG::Interface;
+use strict;
use Any::Moose;
extends 'GnuPG::Interface';
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/openpgp-applet.git
More information about the Pkg-perl-cvs-commits
mailing list