Imported Upstream version 6.41

diff --git a/Changes b/Changes
index 372377f1a032fe317bf6798e8609c9e2abf36e94..9fb764f14381789aa0bf06c7bc47c95a7779af6b 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Change history for libwww-perl
 
+6.41      2019-10-28 14:42:06Z
+    - Allow mirroring to files called '0' (GH#329) (Mark Fowler)
+
 6.40      2019-10-24 12:55:45Z
     - Let Digest authentication act on nonce expiry (GH#313) (Frank Maas)
     - Make file arg for mirror mandatory #304 (GH#326) (Julien Fiegehenn)

diff --git a/META.json b/META.json
index 99b6d467b5353d8e5a09a108272602bc291d5fbf..e1c77bfaf49312f7ae627bbab7197e3a93797901 100644 (file)
--- a/META.json
+++ b/META.json
@@ -109,96 +109,96 @@
    "provides" : {
       "LWP" : {
          "file" : "lib/LWP.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Authen::Basic" : {
          "file" : "lib/LWP/Authen/Basic.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Authen::Digest" : {
          "file" : "lib/LWP/Authen/Digest.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Authen::Ntlm" : {
          "file" : "lib/LWP/Authen/Ntlm.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::ConnCache" : {
          "file" : "lib/LWP/ConnCache.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Debug" : {
          "file" : "lib/LWP/Debug.pm",
-         "version" : "6.40",
+         "version" : "6.41",
          "x_deprecated" : 1
       },
       "LWP::Debug::TraceHTTP" : {
          "file" : "lib/LWP/Debug/TraceHTTP.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::DebugFile" : {
          "file" : "lib/LWP/DebugFile.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::MemberMixin" : {
          "file" : "lib/LWP/MemberMixin.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol" : {
          "file" : "lib/LWP/Protocol.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol::cpan" : {
          "file" : "lib/LWP/Protocol/cpan.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol::data" : {
          "file" : "lib/LWP/Protocol/data.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol::file" : {
          "file" : "lib/LWP/Protocol/file.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol::ftp" : {
          "file" : "lib/LWP/Protocol/ftp.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol::gopher" : {
          "file" : "lib/LWP/Protocol/gopher.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol::http" : {
          "file" : "lib/LWP/Protocol/http.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol::loopback" : {
          "file" : "lib/LWP/Protocol/loopback.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol::mailto" : {
          "file" : "lib/LWP/Protocol/mailto.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol::nntp" : {
          "file" : "lib/LWP/Protocol/nntp.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Protocol::nogo" : {
          "file" : "lib/LWP/Protocol/nogo.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::RobotUA" : {
          "file" : "lib/LWP/RobotUA.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::Simple" : {
          "file" : "lib/LWP/Simple.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       },
       "LWP::UserAgent" : {
          "file" : "lib/LWP/UserAgent.pm",
-         "version" : "6.40"
+         "version" : "6.41"
       }
    },
    "release_status" : "stable",
@@ -215,7 +215,7 @@
       "x_IRC" : "irc://irc.perl.org/#lwp",
       "x_MailingList" : "mailto:libwww@perl.org"
    },
-   "version" : "6.40",
+   "version" : "6.41",
    "x_Dist_Zilla" : {
       "perl" : {
          "version" : "5.030000"
@@ -269,7 +269,7 @@
                   "meta_noindex" : 1
                },
                "Dist::Zilla::Role::ModuleMetadata" : {
-                  "Module::Metadata" : "1.000036",
+                  "Module::Metadata" : "1.000037",
                   "version" : "0.006"
                }
             },
@@ -347,7 +347,7 @@
             "class" : "Dist::Zilla::Plugin::InstallGuide",
             "config" : {
                "Dist::Zilla::Role::ModuleMetadata" : {
-                  "Module::Metadata" : "1.000036",
+                  "Module::Metadata" : "1.000037",
                   "version" : "0.006"
                }
             },
@@ -368,7 +368,7 @@
             "class" : "Dist::Zilla::Plugin::DynamicPrereqs",
             "config" : {
                "Dist::Zilla::Role::ModuleMetadata" : {
-                  "Module::Metadata" : "1.000036",
+                  "Module::Metadata" : "1.000037",
                   "version" : "0.006"
                }
             },
@@ -780,7 +780,7 @@
                   "branch" : null,
                   "changelog" : "Changes",
                   "signed" : 0,
-                  "tag" : "v6.40",
+                  "tag" : "v6.41",
                   "tag_format" : "v%V",
                   "tag_message" : "v%V"
                },
@@ -981,6 +981,7 @@
       "Karen Etheridge <ether@cpan.org>",
       "Katarina Durechova <katarina.durechova@nic.cz>",
       "leedo <leedo@users.noreply.github.com>",
+      "Mark Fowler <mark@twoshortplanks.com>",
       "Mark Stosberg <mark@stosberg.com>",
       "Martin H. Sluka <martin@sluka.de>",
       "Matthew Horsfall <wolfsage@gmail.com>",

diff --git a/META.yml b/META.yml
index 1b1856c4c62f4fa55bd9529508b76bc7f677fe2a..b869badf0cfd7271779f13112123404832fda036 100644 (file)
--- a/META.yml
+++ b/META.yml
@@ -30,74 +30,74 @@ no_index:
 provides:
   LWP:
     file: lib/LWP.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Authen::Basic:
     file: lib/LWP/Authen/Basic.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Authen::Digest:
     file: lib/LWP/Authen/Digest.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Authen::Ntlm:
     file: lib/LWP/Authen/Ntlm.pm
-    version: '6.40'
+    version: '6.41'
   LWP::ConnCache:
     file: lib/LWP/ConnCache.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Debug:
     file: lib/LWP/Debug.pm
-    version: '6.40'
+    version: '6.41'
     x_deprecated: 1
   LWP::Debug::TraceHTTP:
     file: lib/LWP/Debug/TraceHTTP.pm
-    version: '6.40'
+    version: '6.41'
   LWP::DebugFile:
     file: lib/LWP/DebugFile.pm
-    version: '6.40'
+    version: '6.41'
   LWP::MemberMixin:
     file: lib/LWP/MemberMixin.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol:
     file: lib/LWP/Protocol.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol::cpan:
     file: lib/LWP/Protocol/cpan.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol::data:
     file: lib/LWP/Protocol/data.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol::file:
     file: lib/LWP/Protocol/file.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol::ftp:
     file: lib/LWP/Protocol/ftp.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol::gopher:
     file: lib/LWP/Protocol/gopher.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol::http:
     file: lib/LWP/Protocol/http.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol::loopback:
     file: lib/LWP/Protocol/loopback.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol::mailto:
     file: lib/LWP/Protocol/mailto.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol::nntp:
     file: lib/LWP/Protocol/nntp.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Protocol::nogo:
     file: lib/LWP/Protocol/nogo.pm
-    version: '6.40'
+    version: '6.41'
   LWP::RobotUA:
     file: lib/LWP/RobotUA.pm
-    version: '6.40'
+    version: '6.41'
   LWP::Simple:
     file: lib/LWP/Simple.pm
-    version: '6.40'
+    version: '6.41'
   LWP::UserAgent:
     file: lib/LWP/UserAgent.pm
-    version: '6.40'
+    version: '6.41'
 requires:
   Digest::MD5: '0'
   Encode: '2.12'
@@ -134,7 +134,7 @@ resources:
   bugtracker: https://github.com/libwww-perl/libwww-perl/issues
   homepage: https://github.com/libwww-perl/libwww-perl
   repository: https://github.com/libwww-perl/libwww-perl.git
-version: '6.40'
+version: '6.41'
 x_Dist_Zilla:
   perl:
     version: '5.030000'
@@ -177,7 +177,7 @@ x_Dist_Zilla:
           inherit_version: '1'
           meta_noindex: '1'
         Dist::Zilla::Role::ModuleMetadata:
-          Module::Metadata: '1.000036'
+          Module::Metadata: '1.000037'
           version: '0.006'
       name: MetaProvides::Package
       version: '2.004003'
@@ -237,7 +237,7 @@ x_Dist_Zilla:
       class: Dist::Zilla::Plugin::InstallGuide
       config:
         Dist::Zilla::Role::ModuleMetadata:
-          Module::Metadata: '1.000036'
+          Module::Metadata: '1.000037'
           version: '0.006'
       name: InstallGuide
       version: '1.200013'
@@ -253,7 +253,7 @@ x_Dist_Zilla:
       class: Dist::Zilla::Plugin::DynamicPrereqs
       config:
         Dist::Zilla::Role::ModuleMetadata:
-          Module::Metadata: '1.000036'
+          Module::Metadata: '1.000037'
           version: '0.006'
       name: DynamicPrereqs
       version: '0.035'
@@ -591,7 +591,7 @@ x_Dist_Zilla:
           branch: ~
           changelog: Changes
           signed: 0
-          tag: v6.40
+          tag: v6.41
           tag_format: v%V
           tag_message: v%V
         Dist::Zilla::Role::Git::Repo:
@@ -753,6 +753,7 @@ x_contributors:
   - 'Karen Etheridge <ether@cpan.org>'
   - 'Katarina Durechova <katarina.durechova@nic.cz>'
   - 'leedo <leedo@users.noreply.github.com>'
+  - 'Mark Fowler <mark@twoshortplanks.com>'
   - 'Mark Stosberg <mark@stosberg.com>'
   - 'Martin H. Sluka <martin@sluka.de>'
   - 'Matthew Horsfall <wolfsage@gmail.com>'

diff --git a/Makefile.PL b/Makefile.PL
index 82a2d6c51a3f1833717fc3c0f64bf594c17f0c9d..d10a468e3bbd288f48e762470731ca5c957b231a 100644 (file)
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -86,7 +86,7 @@ my %WriteMakefileArgs = (
     "Test::Needs" => 0,
     "Test::RequiresInternet" => 0
   },
-  "VERSION" => "6.40",
+  "VERSION" => "6.41",
   "test" => {
     "TESTS" => "t/*.t t/base/*.t t/base/protocols/*.t t/leak/*.t t/local/*.t t/robot/*.t"
   }

diff --git a/lib/LWP.pm b/lib/LWP.pm
index 298e8fb4a654806ceda8f6f3699a728052c14ae5..816427e62e055c9e0efc3d534b90f4add310d52c 100644 (file)
--- a/lib/LWP.pm
+++ b/lib/LWP.pm
@@ -1,6 +1,6 @@
 package LWP;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require LWP::UserAgent;  # this should load everything you need
 

diff --git a/lib/LWP/Authen/Basic.pm b/lib/LWP/Authen/Basic.pm
index ead55923f518feb173d2fb70542a3dca137b26c2..ccd5e6e34d27321bb71d108f28d904958ccaf440 100644 (file)
--- a/lib/LWP/Authen/Basic.pm
+++ b/lib/LWP/Authen/Basic.pm
@@ -2,7 +2,7 @@ package LWP::Authen::Basic;
 
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require MIME::Base64;
 

diff --git a/lib/LWP/Authen/Digest.pm b/lib/LWP/Authen/Digest.pm
index 2f7c24bc878fcd957481440c62abd3aff39da71f..84157e104e106bb61fb46b7e8c8882dcf47996f6 100644 (file)
--- a/lib/LWP/Authen/Digest.pm
+++ b/lib/LWP/Authen/Digest.pm
@@ -3,7 +3,7 @@ package LWP::Authen::Digest;
 use strict;
 use base 'LWP::Authen::Basic';
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require Digest::MD5;
 

diff --git a/lib/LWP/Authen/Ntlm.pm b/lib/LWP/Authen/Ntlm.pm
index afdb78781e434d3e5cd205fb5870c3d2d450120f..f286144c3842b5641a0598c7027051b4d3652641 100644 (file)
--- a/lib/LWP/Authen/Ntlm.pm
+++ b/lib/LWP/Authen/Ntlm.pm
@@ -2,7 +2,7 @@ package LWP::Authen::Ntlm;
 
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 use Authen::NTLM "1.02";
 use MIME::Base64 "2.12";

diff --git a/lib/LWP/ConnCache.pm b/lib/LWP/ConnCache.pm
index 3c34a8ed4d936a57ba8799f3e1145302549c8381..fef861fc18373cc35e5613caa42cd91581bbd7c1 100644 (file)
--- a/lib/LWP/ConnCache.pm
+++ b/lib/LWP/ConnCache.pm
@@ -2,7 +2,7 @@ package LWP::ConnCache;
 
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 our $DEBUG;
 
 sub new {

diff --git a/lib/LWP/Debug.pm b/lib/LWP/Debug.pm
index 49befb5f6cd63f043dd9491dcfeea10154c4ce20..0ee184524e40925b8d43aebea11c7c6ea788ea34 100644 (file)
--- a/lib/LWP/Debug.pm
+++ b/lib/LWP/Debug.pm
@@ -1,6 +1,6 @@
 package LWP::Debug;    # legacy
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require Exporter;
 our @ISA       = qw(Exporter);

diff --git a/lib/LWP/Debug/TraceHTTP.pm b/lib/LWP/Debug/TraceHTTP.pm
index 5c9caa46a639c9d1c129347a9302d70015ee13d8..7df492aba05d51d42e0f985ce40af21b085f721a 100644 (file)
--- a/lib/LWP/Debug/TraceHTTP.pm
+++ b/lib/LWP/Debug/TraceHTTP.pm
@@ -11,7 +11,7 @@ package LWP::Debug::TraceHTTP;
 use strict;
 use base 'LWP::Protocol::http';
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 package # hide from PAUSE
     LWP::Debug::TraceHTTP::Socket;

diff --git a/lib/LWP/DebugFile.pm b/lib/LWP/DebugFile.pm
index 5d921799041d2813dbe0b2f6ac05534eecdbb662..f9f6481d55b46a4dfef8713fdcdd893f702eb6e6 100644 (file)
--- a/lib/LWP/DebugFile.pm
+++ b/lib/LWP/DebugFile.pm
@@ -1,6 +1,6 @@
 package LWP::DebugFile;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 # legacy stub
 

diff --git a/lib/LWP/MemberMixin.pm b/lib/LWP/MemberMixin.pm
index c50fb45a365fe3f029951074a18ae67d3160bb63..36faab8b4d391eedf95013a66e0fcd8f0d2fa3f8 100644 (file)
--- a/lib/LWP/MemberMixin.pm
+++ b/lib/LWP/MemberMixin.pm
@@ -1,6 +1,6 @@
 package LWP::MemberMixin;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 sub _elem {
     my $self = shift;

diff --git a/lib/LWP/Protocol.pm b/lib/LWP/Protocol.pm
index a411125eca9c9d7a557a5c5defc8341fcbfca6ff..08b146bff65ea877e3e32cc92233535e4b8492c9 100644 (file)
--- a/lib/LWP/Protocol.pm
+++ b/lib/LWP/Protocol.pm
@@ -2,7 +2,7 @@ package LWP::Protocol;
 
 use base 'LWP::MemberMixin';
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 use strict;
 use Carp ();

diff --git a/lib/LWP/Protocol/cpan.pm b/lib/LWP/Protocol/cpan.pm
index 2583ceb96f69d24acf9f144628fd965a4239805f..c30c142d5002e3e5b15b1db12660430f87d3c359 100644 (file)
--- a/lib/LWP/Protocol/cpan.pm
+++ b/lib/LWP/Protocol/cpan.pm
@@ -4,7 +4,7 @@ use strict;
 
 use base qw(LWP::Protocol);
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require URI;
 require HTTP::Status;

diff --git a/lib/LWP/Protocol/data.pm b/lib/LWP/Protocol/data.pm
index 3160ff6f7a6a1a0907e4fad62de6984dbbe9dfa9..8b50ea1207b09bf2551dfea9337fb8a825a2d98a 100644 (file)
--- a/lib/LWP/Protocol/data.pm
+++ b/lib/LWP/Protocol/data.pm
@@ -4,7 +4,7 @@ package LWP::Protocol::data;
 
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require HTTP::Response;
 require HTTP::Status;

diff --git a/lib/LWP/Protocol/file.pm b/lib/LWP/Protocol/file.pm
index a6740c6edcb2c070f592a94d49299d8bf2b903c6..1473be355db0810b8251604430cc09d35df0828f 100644 (file)
--- a/lib/LWP/Protocol/file.pm
+++ b/lib/LWP/Protocol/file.pm
@@ -4,7 +4,7 @@ use base qw(LWP::Protocol);
 
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require LWP::MediaTypes;
 require HTTP::Request;

diff --git a/lib/LWP/Protocol/ftp.pm b/lib/LWP/Protocol/ftp.pm
index 231a9b422152ec35f38912fea3c3e303e250d259..7eec52932f5a579be96a0635a378bd57b970d89e 100644 (file)
--- a/lib/LWP/Protocol/ftp.pm
+++ b/lib/LWP/Protocol/ftp.pm
@@ -5,7 +5,7 @@ package LWP::Protocol::ftp;
 use base qw(LWP::Protocol);
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 use Carp            ();
 use HTTP::Status    ();

diff --git a/lib/LWP/Protocol/gopher.pm b/lib/LWP/Protocol/gopher.pm
index 7f7f59fb7ddfb6f757587615ec14ca0f2b5e49eb..e0fb0d3f8e8913a61f6ed31e3a7d90ca8df0d25f 100644 (file)
--- a/lib/LWP/Protocol/gopher.pm
+++ b/lib/LWP/Protocol/gopher.pm
@@ -9,7 +9,7 @@ package LWP::Protocol::gopher;
 
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require HTTP::Response;
 require HTTP::Status;

diff --git a/lib/LWP/Protocol/http.pm b/lib/LWP/Protocol/http.pm
index aa51f7938a06653e2275b46a312bea1b796ed0a6..1431c7050a5ad9fbbd51e096104a5fb8825f9095 100644 (file)
--- a/lib/LWP/Protocol/http.pm
+++ b/lib/LWP/Protocol/http.pm
@@ -2,7 +2,7 @@ package LWP::Protocol::http;
 
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require HTTP::Response;
 require HTTP::Status;

diff --git a/lib/LWP/Protocol/loopback.pm b/lib/LWP/Protocol/loopback.pm
index f742d20dba3d0e82e7b104cb9bce217419e858d2..d23c1732643dc62e3006d931a818c0e8af1dcf54 100644 (file)
--- a/lib/LWP/Protocol/loopback.pm
+++ b/lib/LWP/Protocol/loopback.pm
@@ -2,7 +2,7 @@ package LWP::Protocol::loopback;
 
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require HTTP::Response;
 

diff --git a/lib/LWP/Protocol/mailto.pm b/lib/LWP/Protocol/mailto.pm
index b842bea2a75eb32bf7407be4ba002d650896645d..6a124841bcc3ce3bc4948b29cfdc5e1eb8f7a190 100644 (file)
--- a/lib/LWP/Protocol/mailto.pm
+++ b/lib/LWP/Protocol/mailto.pm
@@ -11,7 +11,7 @@ require HTTP::Status;
 use Carp;
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 use base qw(LWP::Protocol);
 our $SENDMAIL;

diff --git a/lib/LWP/Protocol/nntp.pm b/lib/LWP/Protocol/nntp.pm
index 70384b848d3f93db48e228f95c123e80538e26a1..2f8c200a8e4d9e65d2b3c6b440643b10bb813b94 100644 (file)
--- a/lib/LWP/Protocol/nntp.pm
+++ b/lib/LWP/Protocol/nntp.pm
@@ -4,7 +4,7 @@ package LWP::Protocol::nntp;
 
 use base qw(LWP::Protocol);
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require HTTP::Response;
 require HTTP::Status;

diff --git a/lib/LWP/Protocol/nogo.pm b/lib/LWP/Protocol/nogo.pm
index f07aa82661c63193e9e8a6e6f75e9526bfad4135..ca4d405993873ff75e2099d5a202ad10910dd191 100644 (file)
--- a/lib/LWP/Protocol/nogo.pm
+++ b/lib/LWP/Protocol/nogo.pm
@@ -7,7 +7,7 @@ package LWP::Protocol::nogo;
 
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require HTTP::Response;
 require HTTP::Status;

diff --git a/lib/LWP/RobotUA.pm b/lib/LWP/RobotUA.pm
index 3bfef475b80aea25a5258929eb297b233e35d461..5355428dba0e870f3e0bad5f24fe4aff7684b510 100644 (file)
--- a/lib/LWP/RobotUA.pm
+++ b/lib/LWP/RobotUA.pm
@@ -2,7 +2,7 @@ package LWP::RobotUA;
 
 use base qw(LWP::UserAgent);
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require WWW::RobotRules;
 require HTTP::Request;

diff --git a/lib/LWP/Simple.pm b/lib/LWP/Simple.pm
index e2968e7380551dd23fe4fb4b0fa925f58eb8fdb9..954d0a770b15490631318eaa40a676487fe32124 100644 (file)
--- a/lib/LWP/Simple.pm
+++ b/lib/LWP/Simple.pm
@@ -2,7 +2,7 @@ package LWP::Simple;
 
 use strict;
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 require Exporter;
 

diff --git a/lib/LWP/UserAgent.pm b/lib/LWP/UserAgent.pm
index c209de9f2ced13b94fa56e2b83b878db0b01602f..32ebcb6cc6b771df296ba9ccac2e32b11bfe9291 100644 (file)
--- a/lib/LWP/UserAgent.pm
+++ b/lib/LWP/UserAgent.pm
@@ -15,7 +15,7 @@ use LWP::Protocol ();
 use Scalar::Util qw(blessed);
 use Try::Tiny qw(try catch);
 
-our $VERSION = '6.40';
+our $VERSION = '6.41';
 
 sub new
 {
@@ -966,7 +966,7 @@ sub mirror
 {
     my($self, $url, $file) = @_;
 
-    die "Local file name is missing" unless $file;
+    die "Local file name is missing" unless defined $file && length $file;
 
     my $request = HTTP::Request->new('GET', $url);
 

diff --git a/t/local/http.t b/t/local/http.t
index c4779c41c52751fa503468f590ca886fd75638e6..615d8cfa8c979cbd3a1ee23f7a90d5dc35c11818 100644 (file)
--- a/t/local/http.t
+++ b/t/local/http.t
@@ -63,7 +63,7 @@ sub _test {
     return plan skip_all => 'We could not talk to our daemon' unless $DAEMON;
     return plan skip_all => 'No base URI' unless $base;
 
-    plan tests => 94;
+    plan tests => 96;
 
     my $ua = LWP::UserAgent->new;
     $ua->agent("Mozilla/0.01 " . $ua->agent);
@@ -291,6 +291,7 @@ sub _test {
     }
     { # mirror
         ok(exception { $ua->mirror(url("/echo/foo", $base)) }, 'mirror: filename required');
+        ok(exception { $ua->mirror(url("/echo/foo", $base), q{}) }, 'mirror: non empty filename required');
         my $copy = "lwp-base-test-$$"; # downloaded copy
         my $res = $ua->mirror(url("/echo/foo", $base), $copy);
         isa_ok($res, 'HTTP::Response', 'mirror: good response object');
@@ -298,6 +299,10 @@ sub _test {
 
         ok(-s $copy, 'mirror: file exists and is not empty');
         unlink($copy);
+
+        $ua->mirror(url("/echo/foo", $base),q{0});
+        ok(1, 'can write to a file called 0');
+        unlink('0');
     }
     { # partial
         my $req = HTTP::Request->new(  GET => url("/partial", $base) );

diff --git a/xt/author/pod-spell.t b/xt/author/pod-spell.t
index ae32c4383169236101f6d31df28c468749534135..f0a6f78242ba50f84673f8b43efb7aa5d14d03ee 100644 (file)
--- a/xt/author/pod-spell.t
+++ b/xt/author/pod-spell.t
@@ -75,6 +75,7 @@ Father
 Fesler
 Fiegehenn
 Finch
+Fowler
 Froehlich
 Gavin
 Gerhard

diff --git a/xt/release/changes_has_content.t b/xt/release/changes_has_content.t
index 2130150a8a346564f29b0bb2f73b5e8a59956946..cdacb41e46a73d90498e438abbf0a8293a188e22 100644 (file)
--- a/xt/release/changes_has_content.t
+++ b/xt/release/changes_has_content.t
@@ -8,7 +8,7 @@ if (($ENV{TRAVIS_PULL_REQUEST} || '') eq 'false') {
 
 note 'Checking Changes';
 my $changes_file = 'Changes';
-my $newver = '6.40';
+my $newver = '6.41';
 my $trial_token = '-TRIAL';
 my $encoding = 'UTF-8';