From: Wayne Davison <wayne@opencoder.net>
Date: Tue, 13 Jan 2009 22:59:17 +0000 (-0800)
Subject: Use "use warnings" rather than -w on the #! line.
X-Git-Url: https://mattmccutchen.net/rsync/rsync-patches.git/commitdiff_plain/0ef5abcbbb95298fa9faf1d3eb275a9e76e1d951

Use "use warnings" rather than -w on the #! line.
---

diff --git a/checksum-reading.diff b/checksum-reading.diff
index 4ad2250..03fed2c 100644
--- a/checksum-reading.diff
+++ b/checksum-reading.diff
@@ -806,9 +806,10 @@ diff --git a/support/rsyncsums b/support/rsyncsums
 new file mode 100755
 --- /dev/null
 +++ b/support/rsyncsums
-@@ -0,0 +1,201 @@
-+#!/usr/bin/perl -w
+@@ -0,0 +1,202 @@
++#!/usr/bin/perl
 +use strict;
++use warnings;
 +
 +use Getopt::Long;
 +use Cwd qw(abs_path cwd);
diff --git a/checksum-xattr.diff b/checksum-xattr.diff
index 1272f71..bd6d3de 100644
--- a/checksum-xattr.diff
+++ b/checksum-xattr.diff
@@ -38,9 +38,10 @@ diff --git a/support/xsums b/support/xsums
 new file mode 100644
 --- /dev/null
 +++ b/support/xsums
-@@ -0,0 +1,118 @@
-+#!/usr/bin/perl -w
+@@ -0,0 +1,119 @@
++#!/usr/bin/perl
 +use strict;
++use warnings;
 +
 +use Getopt::Long;
 +use Cwd qw(abs_path cwd);
diff --git a/db.diff b/db.diff
index e313525..479fd6b 100644
--- a/db.diff
+++ b/db.diff
@@ -1068,9 +1068,10 @@ diff --git a/support/rsyncdb b/support/rsyncdb
 new file mode 100755
 --- /dev/null
 +++ b/support/rsyncdb
-@@ -0,0 +1,331 @@
-+#!/usr/bin/perl -w
+@@ -0,0 +1,332 @@
++#!/usr/bin/perl
 +use strict;
++use warnings;
 +
 +use DBI;
 +use Getopt::Long;
diff --git a/nameconverter.diff b/nameconverter.diff
index 81e3c30..1d65549 100644
--- a/nameconverter.diff
+++ b/nameconverter.diff
@@ -222,8 +222,8 @@ diff --git a/support/nameconvert b/support/nameconvert
 new file mode 100755
 --- /dev/null
 +++ b/support/nameconvert
-@@ -0,0 +1,42 @@
-+#!/usr/bin/perl -w
+@@ -0,0 +1,43 @@
++#!/usr/bin/perl
 +# This implements a simple protocol to do {user,group}-{name,id}
 +# conversions.  All input and output consists of simple strings
 +# with a terminating null char (or newline for debugging).  If
@@ -242,6 +242,7 @@ new file mode 100755
 +# "name converter" setting.
 +
 +use strict;
++use warnings;
 +
 +my $eol = grep(/^--debug$/, @ARGV) ? "\n" : "\0";
 +$/ = $eol;