commit 45e583d077eba884825e3c74858a76e4b0ee450b
Author: Petr Šabata <contyk@xxxxxxxxxx>
Date: Tue Feb 12 17:01:15 2013 +0100
Fix the operator precedence (rt#80065, rhbz#864102)
Net-SSH2-0.47-op-priority.patch | 22 ++++++++++++++++++++++
perl-Net-SSH2.spec | 7 ++++++-
2 files changed, 28 insertions(+), 1 deletions(-)
---
diff --git a/Net-SSH2-0.47-op-priority.patch b/Net-SSH2-0.47-op-priority.patch
new file mode 100644
index 0000000..5f0ed30
--- /dev/null
+++ b/Net-SSH2-0.47-op-priority.patch
@@ -0,0 +1,22 @@
+diff --git a/lib/Net/SSH2.pm b/lib/Net/SSH2.pm
+index 4867f4e..3d7b23c 100644
+--- a/lib/Net/SSH2.pm
++++ b/lib/Net/SSH2.pm
+@@ -279,7 +279,7 @@ sub connect {
+
+ sub _auth_methods {
+ return {
+- ((version())[1]||0 >= 0x010203 ? (
++ (((version())[1]||0) >= 0x010203 ? (
+ 'agent' => {
+ ssh => 'agent',
+ method => \&auth_agent,
+@@ -322,7 +322,7 @@ sub _auth_methods {
+
+ sub _auth_rank {
+ return [
+- ((version())[1]||0 >= 0x010203 ? ('agent') : ()),
++ (((version())[1]||0) >= 0x010203 ? ('agent') : ()),
+ qw(hostbased publickey keyboard keyboard-auto password none)
+ ];
+ }
diff --git a/perl-Net-SSH2.spec b/perl-Net-SSH2.spec
index ce84127..0580ae3 100644
--- a/perl-Net-SSH2.spec
+++ b/perl-Net-SSH2.spec
@@ -1,11 +1,13 @@
Name: perl-Net-SSH2
Version: 0.45
-Release: 2%{?dist}
+Release: 3%{?dist}
Summary: Support for the SSH 2 protocol via libSSH2
License: GPL+ or Artistic
Group: Development/Libraries
URL: http://search.cpan.org/dist/Net-SSH2/
Source0: http://search.cpan.org/CPAN/authors/id/R/RK/RKITOVER/Net-SSH2-%{version}.tar.gz
+# rt#80065, rhbz#864102
+Patch0: Net-SSH2-0.47-op-priority.patch
# Avoid the EE::MM CCFLAGS bug
Requires: perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version))
BuildRequires: perl(Carp)
@@ -56,6 +58,9 @@ make test
%{_mandir}/man3/*
%changelog
+* Tue Feb 12 2013 Petr Šabata <contyk@xxxxxxxxxx> - 0.45-3
+- Fix the operator precedence (rt#80065, rhbz#864102)
+
* Wed Jul 04 2012 Petr Šabata <contyk@xxxxxxxxxx> - 0.45-2
- Avoid libssh2 bug #826511
--
Fedora Extras Perl SIG
http://www.fedoraproject.org/wiki/Extras/SIGs/Perl
perl-devel mailing list
perl-devel@xxxxxxxxxxxxxxxxxxxxxxx
https://admin.fedoraproject.org/mailman/listinfo/perl-devel
