This is an automated email from the git hooks/post-receive script.
ntyni pushed a commit to annotated tag debian/1.1091-3
in repository libdevel-ptkdb-perl.
commit 0a48799146426a6ea6c8035ebb79112257dcce6f
Author: Niko Tyni <nt...@debian.org>
Date: Sun Jun 14 19:06:19 2015 +0300
Fix a precedence issue in breakPointEvalExpr() return value
Closes: #783756
---
...dence-issue-in-breakPointEvalExpr-return-.patch | 26 ++++++++++++++++++++++
debian/patches/series | 1 +
2 files changed, 27 insertions(+)
diff --git
a/debian/patches/0001-Fix-a-precedence-issue-in-breakPointEvalExpr-return-.patch
b/debian/patches/0001-Fix-a-precedence-issue-in-breakPointEvalExpr-return-.patch
new file mode 100644
index 0000000..fe5d27a
--- /dev/null
+++
b/debian/patches/0001-Fix-a-precedence-issue-in-breakPointEvalExpr-return-.patch
@@ -0,0 +1,26 @@
+From 7b842cf495b6f05561a806316c376120bcbf82a1 Mon Sep 17 00:00:00 2001
+From: Niko Tyni <nt...@debian.org>
+Date: Sun, 14 Jun 2015 19:06:19 +0300
+Subject: [PATCH] Fix a precedence issue in breakPointEvalExpr() return value
+
+Bug: https://bugs.debian.org/783756
+---
+ ptkdb.pm | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+diff --git a/ptkdb.pm b/ptkdb.pm
+index cd77fda..fc9fec2 100644
+--- a/ptkdb.pm
++++ b/ptkdb.pm
+@@ -4047,7 +4047,7 @@ sub breakPointEvalExpr {
+
+ $DB::window->DoAlert($@) if $@ ;
+
+- return $result[0] or @result ; # we could have a case where the 1st element
is undefined
++ return ($result[0] or @result) ; # we could have a case where the 1st
element is undefined
+ # but subsequent elements are defined
+
+ } # end of breakPointEvalExpr
+--
+2.1.4
+
diff --git a/debian/patches/series b/debian/patches/series
index 5299247..27e610e 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1 +1,2 @@
spelling.patch
+0001-Fix-a-precedence-issue-in-breakPointEvalExpr-return-.patch
--
Alioth's /usr/local/bin/git-commit-notice on
/srv/git.debian.org/git/pkg-perl/packages/libdevel-ptkdb-perl.git
_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
