I have uploadedĀ 1.2.1-6.3, nmu diff is attached.

Given the length of time since a maintainer upload and the severity I
went with a direct upload rather than delayed. I hope that is ok.

Ian.
diff -u flexbackup-1.2.1/debian/changelog flexbackup-1.2.1/debian/changelog
--- flexbackup-1.2.1/debian/changelog
+++ flexbackup-1.2.1/debian/changelog
@@ -1,3 +1,10 @@
+flexbackup (1.2.1-6.3) unstable; urgency=medium
+
+  * Non-maintainer upload.
+  * Stop using defined on hashes (closes: #816164).
+
+ -- Ian Campbell <i...@debian.org>  Sun, 28 Feb 2016 10:14:56 +0000
+
 flexbackup (1.2.1-6.2) unstable; urgency=medium
 
   * Non-maintainer upload.
diff -u flexbackup-1.2.1/debian/patches/00list flexbackup-1.2.1/debian/patches/00list
--- flexbackup-1.2.1/debian/patches/00list
+++ flexbackup-1.2.1/debian/patches/00list
@@ -10,0 +11 @@
+70_no_defined_on_hash
only in patch2:
unchanged:
--- flexbackup-1.2.1.orig/debian/patches/70_no_defined_on_hash.dpatch
+++ flexbackup-1.2.1/debian/patches/70_no_defined_on_hash.dpatch
@@ -0,0 +1,48 @@
+#!/bin/sh /usr/share/dpatch/dpatch-run
+## 70_no_defined_on_hash.dpatch by Ian Campbell <i...@debian.org>
+##
+## All lines beginning with `## DP:' are a description of the patch.
+## DP: Bug #816164 patch by Ian Campbell <i...@debian.org>
+## DP:
+## DP: defined(%hash) and defined(@array) have been deprecated for a while and
+## DP: are now fatal errors:
+## DP:
+## DP: Can't use 'defined(%hash)' (Maybe you should just omit the defined()?) at /usr/bin/flexbackup line 1053.
+## DP: Can't use 'defined(@array)' (Maybe you should just omit the defined()?) at /usr/bin/flexbackup line 2688.
+## DP:
+## DP: See http://perldoc.perl.org/perldelta.html#defined%28%40array%29-and-defined%28%25hash%29-are-now-fatal-errors
+## DP:
+## DP: http://perldoc.perl.org/functions/defined.html recommends just checking
+## DP: for length (i.e. removing the defined()). Do so.
+
+@DPATCH@
+diff -urNad flexbackup-svn~/flexbackup flexbackup-svn/flexbackup
+--- flexbackup-svn~/flexbackup	2016-02-28 08:54:08.338589461 +0000
++++ flexbackup-svn/flexbackup	2016-02-28 08:56:08.934584524 +0000
+@@ -1050,7 +1050,7 @@
+     } else {
+ 	$prunekey = $dir;
+     }
+-    if (defined(%{$::prune{$prunekey}})) {
++    if ($::prune{$prunekey}) {
+ 	&log("| NOTE: \$prune is ignored for type=dump");
+     }
+ 
+@@ -2685,7 +2685,7 @@
+     }
+ 
+     # Flag old config file
+-    if (defined(@cfg::filesystems) or defined($cfg::mt_var_blksize)) {
++    if (@cfg::filesystems or defined($cfg::mt_var_blksize)) {
+ 	# so strict shuts up
+ 	my $junk = @cfg::filesystems;
+ 	$junk = $cfg::mt_var_blksize;
+@@ -4883,7 +4883,7 @@
+ 	$prunekey = $dir;
+     }
+ 
+-    if (defined(%{$::prune{$prunekey}})) {
++    if ($::prune{$prunekey}) {
+ 	# FreeBSD needs -E (above) and no backslashes around the (|) chars
+ 	if ($::uname =~ /FreeBSD/) {
+ 	    $cmd .= '-regex "\./(';

Attachment: signature.asc
Description: This is a digitally signed message part

Reply via email to