[Pkg-octave-commit] [octave-pkg-dev] 01/03: octave-pkg-helper: Avoid error due to undefined $deps variable

Rafael Laboissiere rafael at debian.org
Wed Dec 27 23:05:56 UTC 2017


This is an automated email from the git hooks/post-receive script.

rafael pushed a commit to branch master
in repository octave-pkg-dev.

commit b21520e02f105bbfe1203cad72e46125f2fe0426
Author: Rafael Laboissiere <rafael at debian.org>
Date:   Wed Dec 27 14:48:13 2017 -0200

    octave-pkg-helper: Avoid error due to undefined $deps variable
---
 octave-pkg-helper | 16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

diff --git a/octave-pkg-helper b/octave-pkg-helper
index b703475..e7a2138 100755
--- a/octave-pkg-helper
+++ b/octave-pkg-helper
@@ -39,13 +39,15 @@ if (-f "DESCRIPTION") {
     my $fields = MIME::Head->new->from_file ("DESCRIPTION");
 
     my $deps = $fields->get ('depends');
-    map {
-	if (/([^ ]+) \((.*)\)/) {
-	    $depends {"octave-$1"} = $2;
-	} else {
-	    $depends {"octave-$_"} = "";
-	}
-    } grep {not /^octave/i} split (", ", $deps);
+    if (defined $deps) {
+        map {
+            if (/([^ ]+) \((.*)\)/) {
+                $depends {"octave-$1"} = $2;
+            } else {
+                $depends {"octave-$_"} = "";
+            }
+        } grep {not /^octave/i} split (", ", $deps);
+    }
 
     $desc = $fields->get ('description');
     $desc =~ s/\n */\n/g;

-- 
Alioth's /home/groups/pkg-octave/bin/git-commit-notice on /srv/git.debian.org/git/pkg-octave/octave-pkg-dev.git



More information about the Pkg-octave-commit mailing list