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

nickm-guest pushed a commit to branch master
in repository libfile-util-perl.

commit b3f469577c97919eb1f01d2aaef4803bb7546b32
Author: Nick Morrott <knowledgejun...@gmail.com>
Date:   Tue Aug 2 21:13:27 2016 +0100

    Imported Upstream version 4.161950
---
 Build.PL                              |   2 +-
 Changes                               |   9 +++
 MANIFEST                              |   1 +
 META.json                             | 114 +++++++++++++++++-----------------
 META.yml                              |  94 ++++++++++++++--------------
 Makefile.PL                           |   2 +-
 NEWS                                  |   5 ++
 README                                |   2 +-
 SIGNATURE                             |  65 +++++++++----------
 lib/File/Util.pm                      |   8 ++-
 lib/File/Util/Cookbook.pod            |   2 +-
 lib/File/Util/Definitions.pm          |   4 +-
 lib/File/Util/Exception.pm            |   4 +-
 lib/File/Util/Exception/Diagnostic.pm |   4 +-
 lib/File/Util/Exception/Standard.pm   |   4 +-
 lib/File/Util/Interface/Classic.pm    |   4 +-
 lib/File/Util/Interface/Modern.pm     |   4 +-
 lib/File/Util/Manual.pod              |   2 +-
 lib/File/Util/Manual/Examples.pod     |   2 +-
 t/021_list_dir_regression.t           |  37 +++++++++++
 xt/author/no-tabs.t                   |   1 +
 21 files changed, 213 insertions(+), 157 deletions(-)

diff --git a/Build.PL b/Build.PL
index 1c0db7e..98ffbc5 100644
--- a/Build.PL
+++ b/Build.PL
@@ -20,7 +20,7 @@ my %module_build_args = (
     "Tommy Butler"
   ],
   "dist_name" => "File-Util",
-  "dist_version" => "4.161200",
+  "dist_version" => "4.161950",
   "license" => "perl",
   "module_name" => "File::Util",
   "recommends" => {
diff --git a/Changes b/Changes
index 367b194..d7e4443 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,14 @@
 Revision history for Perl extension File::Util.pm
 
+4.161950 2016-07-12
+  - This release fixes a critical bug in the list_dir() method, detailed at
+    https://rt.cpan.org/Public/Bug/Display.html?id=115511
+  - Regression test added to catch the failure condition
+  - NOTE: No major code or featureset changes included as part of this release,
+    therefore it is still deemed "stable", as no significant changes to the 
code
+    have been made beyond a two line bugfix that remedies the problem that
+    caused the list_dir() method to fail under certain conditions.
+
 4.161200 2016-04-29
   - The previous TRIAL release passes muster by cpantesters.  This is
     now released as a STABLE dist, although more features are planned in
diff --git a/MANIFEST b/MANIFEST
index cd81a9f..2b7832d 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -69,6 +69,7 @@ t/017_make_dir_list_dir.t
 t/018_list_dir_advancedmatch.t
 t/019_load_dir.t
 t/020_write_file.t
+t/021_list_dir_regression.t
 t/bin
 t/txt
 xt/author/critic.t
diff --git a/META.json b/META.json
index 25bed0d..8e5b272 100644
--- a/META.json
+++ b/META.json
@@ -98,31 +98,31 @@
    "provides" : {
       "File::Util" : {
          "file" : "lib/File/Util.pm",
-         "version" : "4.161200"
+         "version" : "4.161950"
       },
       "File::Util::Definitions" : {
          "file" : "lib/File/Util/Definitions.pm",
-         "version" : "4.161200"
+         "version" : "4.161950"
       },
       "File::Util::Exception" : {
          "file" : "lib/File/Util/Exception.pm",
-         "version" : "4.161200"
+         "version" : "4.161950"
       },
       "File::Util::Exception::Diagnostic" : {
          "file" : "lib/File/Util/Exception/Diagnostic.pm",
-         "version" : "4.161200"
+         "version" : "4.161950"
       },
       "File::Util::Exception::Standard" : {
          "file" : "lib/File/Util/Exception/Standard.pm",
-         "version" : "4.161200"
+         "version" : "4.161950"
       },
       "File::Util::Interface::Classic" : {
          "file" : "lib/File/Util/Interface/Classic.pm",
-         "version" : "4.161200"
+         "version" : "4.161950"
       },
       "File::Util::Interface::Modern" : {
          "file" : "lib/File/Util/Interface/Modern.pm",
-         "version" : "4.161200"
+         "version" : "4.161950"
       }
    },
    "release_status" : "stable",
@@ -138,7 +138,7 @@
          "web" : "https://github.com/tommybutler/file-util";
       }
    },
-   "version" : "4.161200",
+   "version" : "4.161950",
    "x_Dist_Zilla" : {
       "perl" : {
          "version" : "5.022001"
@@ -317,16 +317,57 @@
             "version" : "0.021"
          },
          {
-            "class" : "Dist::Zilla::Plugin::Test::Version",
-            "name" : "@TestingMania/Test::Version",
-            "version" : "1.05"
-         },
-         {
             "class" : "Dist::Zilla::Plugin::Test::CPAN::Meta::JSON",
             "name" : "@TestingMania/Test::CPAN::Meta::JSON",
             "version" : "0.004"
          },
          {
+            "class" : "Dist::Zilla::Plugin::PodSyntaxTests",
+            "name" : "@TestingMania/PodSyntaxTests",
+            "version" : "5.042"
+         },
+         {
+            "class" : "Dist::Zilla::Plugin::Test::Synopsis",
+            "name" : "@TestingMania/Test::Synopsis",
+            "version" : "2.000006"
+         },
+         {
+            "class" : "Dist::Zilla::Plugin::MojibakeTests",
+            "name" : "@TestingMania/MojibakeTests",
+            "version" : "0.8"
+         },
+         {
+            "class" : "Dist::Zilla::Plugin::Test::Kwalitee",
+            "config" : {
+               "Dist::Zilla::Plugin::Test::Kwalitee" : {
+                  "filename" : "xt/release/kwalitee.t",
+                  "skiptest" : []
+               }
+            },
+            "name" : "@TestingMania/Test::Kwalitee",
+            "version" : "2.12"
+         },
+         {
+            "class" : "Dist::Zilla::Plugin::Test::Perl::Critic",
+            "name" : "@TestingMania/Test::Perl::Critic",
+            "version" : "3.000"
+         },
+         {
+            "class" : "Dist::Zilla::Plugin::MetaTests",
+            "name" : "@TestingMania/MetaTests",
+            "version" : "5.042"
+         },
+         {
+            "class" : "Dist::Zilla::Plugin::Test::CPAN::Changes",
+            "name" : "@TestingMania/Test::CPAN::Changes",
+            "version" : "0.009"
+         },
+         {
+            "class" : "Dist::Zilla::Plugin::Test::DistManifest",
+            "name" : "@TestingMania/Test::DistManifest",
+            "version" : "2.000005"
+         },
+         {
             "class" : "Dist::Zilla::Plugin::Test::NoTabs",
             "config" : {
                "Dist::Zilla::Plugin::Test::NoTabs" : {
@@ -369,50 +410,9 @@
             "version" : "2.054"
          },
          {
-            "class" : "Dist::Zilla::Plugin::Test::Perl::Critic",
-            "name" : "@TestingMania/Test::Perl::Critic",
-            "version" : "3.000"
-         },
-         {
-            "class" : "Dist::Zilla::Plugin::Test::DistManifest",
-            "name" : "@TestingMania/Test::DistManifest",
-            "version" : "2.000005"
-         },
-         {
-            "class" : "Dist::Zilla::Plugin::Test::Synopsis",
-            "name" : "@TestingMania/Test::Synopsis",
-            "version" : "2.000006"
-         },
-         {
-            "class" : "Dist::Zilla::Plugin::PodSyntaxTests",
-            "name" : "@TestingMania/PodSyntaxTests",
-            "version" : "5.042"
-         },
-         {
-            "class" : "Dist::Zilla::Plugin::MojibakeTests",
-            "name" : "@TestingMania/MojibakeTests",
-            "version" : "0.8"
-         },
-         {
-            "class" : "Dist::Zilla::Plugin::MetaTests",
-            "name" : "@TestingMania/MetaTests",
-            "version" : "5.042"
-         },
-         {
-            "class" : "Dist::Zilla::Plugin::Test::Kwalitee",
-            "config" : {
-               "Dist::Zilla::Plugin::Test::Kwalitee" : {
-                  "filename" : "xt/release/kwalitee.t",
-                  "skiptest" : []
-               }
-            },
-            "name" : "@TestingMania/Test::Kwalitee",
-            "version" : "2.12"
-         },
-         {
-            "class" : "Dist::Zilla::Plugin::Test::CPAN::Changes",
-            "name" : "@TestingMania/Test::CPAN::Changes",
-            "version" : "0.009"
+            "class" : "Dist::Zilla::Plugin::Test::Version",
+            "name" : "@TestingMania/Test::Version",
+            "version" : "1.05"
          },
          {
             "class" : "Dist::Zilla::Plugin::Test::PodSpelling",
diff --git a/META.yml b/META.yml
index 47012b6..140074f 100644
--- a/META.yml
+++ b/META.yml
@@ -35,25 +35,25 @@ name: File-Util
 provides:
   File::Util:
     file: lib/File/Util.pm
-    version: '4.161200'
+    version: '4.161950'
   File::Util::Definitions:
     file: lib/File/Util/Definitions.pm
-    version: '4.161200'
+    version: '4.161950'
   File::Util::Exception:
     file: lib/File/Util/Exception.pm
-    version: '4.161200'
+    version: '4.161950'
   File::Util::Exception::Diagnostic:
     file: lib/File/Util/Exception/Diagnostic.pm
-    version: '4.161200'
+    version: '4.161950'
   File::Util::Exception::Standard:
     file: lib/File/Util/Exception/Standard.pm
-    version: '4.161200'
+    version: '4.161950'
   File::Util::Interface::Classic:
     file: lib/File/Util/Interface/Classic.pm
-    version: '4.161200'
+    version: '4.161950'
   File::Util::Interface::Modern:
     file: lib/File/Util/Interface/Modern.pm
-    version: '4.161200'
+    version: '4.161950'
 recommends:
   Unicode::UTF8: '0.58'
 requires:
@@ -71,7 +71,7 @@ resources:
   bugtracker: https://rt.cpan.org/Dist/Display.html?Name=File%3A%3AUtil
   homepage: https://github.com/tommybutler/file-util/wiki
   repository: git://github.com/tommybutler/file-util.git
-version: '4.161200'
+version: '4.161950'
 x_Dist_Zilla:
   perl:
     version: '5.022001'
@@ -210,14 +210,46 @@ x_Dist_Zilla:
       name: Test::ReportPrereqs
       version: '0.021'
     -
-      class: Dist::Zilla::Plugin::Test::Version
-      name: '@TestingMania/Test::Version'
-      version: '1.05'
-    -
       class: Dist::Zilla::Plugin::Test::CPAN::Meta::JSON
       name: '@TestingMania/Test::CPAN::Meta::JSON'
       version: '0.004'
     -
+      class: Dist::Zilla::Plugin::PodSyntaxTests
+      name: '@TestingMania/PodSyntaxTests'
+      version: '5.042'
+    -
+      class: Dist::Zilla::Plugin::Test::Synopsis
+      name: '@TestingMania/Test::Synopsis'
+      version: '2.000006'
+    -
+      class: Dist::Zilla::Plugin::MojibakeTests
+      name: '@TestingMania/MojibakeTests'
+      version: '0.8'
+    -
+      class: Dist::Zilla::Plugin::Test::Kwalitee
+      config:
+        Dist::Zilla::Plugin::Test::Kwalitee:
+          filename: xt/release/kwalitee.t
+          skiptest: []
+      name: '@TestingMania/Test::Kwalitee'
+      version: '2.12'
+    -
+      class: Dist::Zilla::Plugin::Test::Perl::Critic
+      name: '@TestingMania/Test::Perl::Critic'
+      version: '3.000'
+    -
+      class: Dist::Zilla::Plugin::MetaTests
+      name: '@TestingMania/MetaTests'
+      version: '5.042'
+    -
+      class: Dist::Zilla::Plugin::Test::CPAN::Changes
+      name: '@TestingMania/Test::CPAN::Changes'
+      version: '0.009'
+    -
+      class: Dist::Zilla::Plugin::Test::DistManifest
+      name: '@TestingMania/Test::DistManifest'
+      version: '2.000005'
+    -
       class: Dist::Zilla::Plugin::Test::NoTabs
       config:
         Dist::Zilla::Plugin::Test::NoTabs:
@@ -250,41 +282,9 @@ x_Dist_Zilla:
       name: '@TestingMania/Test::Compile'
       version: '2.054'
     -
-      class: Dist::Zilla::Plugin::Test::Perl::Critic
-      name: '@TestingMania/Test::Perl::Critic'
-      version: '3.000'
-    -
-      class: Dist::Zilla::Plugin::Test::DistManifest
-      name: '@TestingMania/Test::DistManifest'
-      version: '2.000005'
-    -
-      class: Dist::Zilla::Plugin::Test::Synopsis
-      name: '@TestingMania/Test::Synopsis'
-      version: '2.000006'
-    -
-      class: Dist::Zilla::Plugin::PodSyntaxTests
-      name: '@TestingMania/PodSyntaxTests'
-      version: '5.042'
-    -
-      class: Dist::Zilla::Plugin::MojibakeTests
-      name: '@TestingMania/MojibakeTests'
-      version: '0.8'
-    -
-      class: Dist::Zilla::Plugin::MetaTests
-      name: '@TestingMania/MetaTests'
-      version: '5.042'
-    -
-      class: Dist::Zilla::Plugin::Test::Kwalitee
-      config:
-        Dist::Zilla::Plugin::Test::Kwalitee:
-          filename: xt/release/kwalitee.t
-          skiptest: []
-      name: '@TestingMania/Test::Kwalitee'
-      version: '2.12'
-    -
-      class: Dist::Zilla::Plugin::Test::CPAN::Changes
-      name: '@TestingMania/Test::CPAN::Changes'
-      version: '0.009'
+      class: Dist::Zilla::Plugin::Test::Version
+      name: '@TestingMania/Test::Version'
+      version: '1.05'
     -
       class: Dist::Zilla::Plugin::Test::PodSpelling
       config:
diff --git a/Makefile.PL b/Makefile.PL
index 0e8bbfb..9e40c60 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -50,7 +50,7 @@ my %WriteMakefileArgs = (
     "blib" => "1.01",
     "utf8" => 0
   },
-  "VERSION" => "4.161200",
+  "VERSION" => "4.161950",
   "test" => {
     "TESTS" => "t/*.t"
   }
diff --git a/NEWS b/NEWS
index a5b72aa..08389d4 100644
--- a/NEWS
+++ b/NEWS
@@ -1,5 +1,10 @@
 NEWS for File::Util
 
+Tue Jul 12 18:37:17 CDT 2016
+   Releasing this bug fix to CPAN immediately.  Having changed only one line
+   of code, and knowing the criticality of the bug, I'm releasing this as
+   GA and skipping the ...-TRIAL dist formalities.  Regression test also added.
+
 Thu Jun  6 23:11:39 CDT 2013
    Since Sat Mar 2 01:13:46 CST 2013, 580 test runs from the CPAN testers
    have had 100% complete PASSes.  I'm releasing the code as-is, as
diff --git a/README b/README
index 99248d0..6538248 100644
--- a/README
+++ b/README
@@ -1,7 +1,7 @@
 
 
 This archive contains the distribution File-Util,
-version 4.161200:
+version 4.161950:
 
   Easy, versatile, portable file handling
 
diff --git a/SIGNATURE b/SIGNATURE
index f9de9b3..11c67f5 100644
--- a/SIGNATURE
+++ b/SIGNATURE
@@ -15,18 +15,18 @@ not run its Makefile.PL or Build.PL.
 Hash: SHA1
 
 SHA1 76a08172c2a635f36337c548aa80600ef0346159 AUTHORS
-SHA1 78acf53a11298a030542141a64f26eaf3a56a546 Build.PL
+SHA1 81f77e897bb97e83fd98942f32134d8b5cd80cb9 Build.PL
 SHA1 bb2492d6fbfa8b7d456f2b8986db4533908dc097 COPYING
-SHA1 d256fec0dd41b955d475de4c9aeb12474c3a36c8 Changes
+SHA1 13b2c067638ae4b53cedbea76b1500a706f4001b Changes
 SHA1 027631fb6bcf8560acb0ecd72b9af91145b9f73d INSTALL
 SHA1 c1841a7e92c0b7b35a03ebb1502bd273f94c1c37 LICENSE
-SHA1 ce1c4849e84e854dd6d49a0ed933369206eecc0f MANIFEST
+SHA1 1973737d8495d352271feb22edfe695d541cebda MANIFEST
 SHA1 8dd8a3dfd3c3166f12bbb2cfff232bb6a0e55ff6 MANIFEST.SKIP
-SHA1 44b17912bdefd782a2454e9c251b43f10aca2c19 META.json
-SHA1 96f43522cd1877d1ee76ebe21216bdae50c0d1fa META.yml
-SHA1 086feffaa1b6be984e73c0926a6d9e5a381640d5 Makefile.PL
-SHA1 f532dfd71c080d85c0acd1d5e7aff4209b32a839 NEWS
-SHA1 a508a7a36cab59500b93f322df2ea6da7be0795a README
+SHA1 2dab00015ee3fd9a0da3e83d9066212d748f3b21 META.json
+SHA1 f642bd79cc2e542d1f299681a8bff81ba7177b72 META.yml
+SHA1 89b53e371d01892174a448b8313b5422ca76d066 Makefile.PL
+SHA1 f0cdd5fbbcf49a0e071c0429356577e307a3cced NEWS
+SHA1 fba4484a8ab72480f27239bf50d99d9677f7e6de README
 SHA1 15b388c2e3fd1219285b9d8066bb0d6378b83ab0 TODO
 SHA1 34399e61cb0505e41526448699bed0b4d12f35af dist.ini
 SHA1 874ad198d5fd2f480c9449f7dc0359442f3ad7d5 examples/batch_file_rename.pl
@@ -45,16 +45,16 @@ SHA1 ae9afb8f97c188031c0e74ec60b627584e9fa383 
examples/recursively_remove_a_dire
 SHA1 17a1a90b90e22fd0b5780fbef6026a16c448ff51 examples/retry_open_handle.pl
 SHA1 70177b252e54feeb078e5fab9c6de0ad43cba784 
examples/wrap_the_lines_in_a_file.pl
 SHA1 3ef56e2a76269416d29b0640406bac70a2be0a51 
examples/write_or_append_to_a_file.pl
-SHA1 0d627c8343ded987ab4e0a3c6aec8d282b8e3eb3 lib/File/Util.pm
-SHA1 c1914374d7a086ae97ef9d436ab237661ca7a1bd lib/File/Util/Cookbook.pod
-SHA1 1a43ce4efbdae24bc9decdfd26a1d52316059a47 lib/File/Util/Definitions.pm
-SHA1 9e8c39a2306a13d39312e4d282ce5ee4519bfdf0 lib/File/Util/Exception.pm
-SHA1 b71ee9a3d24a7b292bc5b24383a5e212cfead468 
lib/File/Util/Exception/Diagnostic.pm
-SHA1 750ed9892038759b4f65952f283b865b5e701467 
lib/File/Util/Exception/Standard.pm
-SHA1 dc89336cd3e50d89bfc45a268a77f95b824a7a6c 
lib/File/Util/Interface/Classic.pm
-SHA1 f746f1a3dab6a6ae0fe85f625083dd4c3d66e721 lib/File/Util/Interface/Modern.pm
-SHA1 3f4cbde3c8c02188941c76a231d1b070c858d39f lib/File/Util/Manual.pod
-SHA1 122bc985e9a7eb0f504324fc6e3f761d38acbbcb lib/File/Util/Manual/Examples.pod
+SHA1 d89b2f44330f56484fd5464457d4b775734da007 lib/File/Util.pm
+SHA1 02148d57c6b2e6035b1e8f4359c77c4fdb686701 lib/File/Util/Cookbook.pod
+SHA1 d3ef27d322849c5b7176c216480955fedab4d5ff lib/File/Util/Definitions.pm
+SHA1 8df8c036b4e5459d4ec1d4397afb6241b3803bf0 lib/File/Util/Exception.pm
+SHA1 27a355674ab20a967cc98da8accd96aa7bc2b610 
lib/File/Util/Exception/Diagnostic.pm
+SHA1 1f48c4d796b3ab09106db8dac98617c0cf317652 
lib/File/Util/Exception/Standard.pm
+SHA1 e19e53c4861ece598d8e771be86c61021382f5d8 
lib/File/Util/Interface/Classic.pm
+SHA1 6f84f33d52e26f33924ff909c09c67aafb97b598 lib/File/Util/Interface/Modern.pm
+SHA1 c517ac26526ece496aef4851f4bd7ffa6b6c5de0 lib/File/Util/Manual.pod
+SHA1 82035f9fd041340b741f6338dcda3355b8ffd262 lib/File/Util/Manual/Examples.pod
 SHA1 9d689f1a8aee3f115cd06b340f5557bdeac5a83f performance/bench_listdir.pl
 SHA1 07a1463fd7053e77e5b9d5b16bfe8de0cd0909b7 performance/bench_load_time.pl
 SHA1 0c6b2574d244e23d247400ecc0d4aedf2e940090 performance/profile_listdir.pl
@@ -83,11 +83,12 @@ SHA1 9aba8983f72fc09383746da9e1d72024d1f12d7f 
t/017_make_dir_list_dir.t
 SHA1 6be9177ea6cca93f1c28b956f25d90c3cc3d66c3 t/018_list_dir_advancedmatch.t
 SHA1 43309f57e58b9662c464b0e6ac3fd36ccd637032 t/019_load_dir.t
 SHA1 e9cc72017286700ecd33fd102ea0f572661d11b5 t/020_write_file.t
+SHA1 f1bb65f231c00438219e890ceceed5bd96860a00 t/021_list_dir_regression.t
 SHA1 cac36f84f0db21cf6fa980a9b31ca3453a84f8e4 t/bin
 SHA1 65821dbdac86467eb04a9ad83dfad0600dfabdd9 t/txt
 SHA1 5bd500053b03b9a17b570fb39ca2e5ee959540dc xt/author/critic.t
 SHA1 f2c40e917e02088703731272f86cbb906ab19eb3 xt/author/mojibake.t
-SHA1 d41ae496e44c8914308c4eedbed8737a050676ac xt/author/no-tabs.t
+SHA1 d002c9f0d6f3ad548f528b8668e6af40314030fd xt/author/no-tabs.t
 SHA1 a6d8370909ec0e0755d4bd691eb81d722cf94430 xt/author/pod-coverage.t
 SHA1 e32dceb64d9c02fd202c399aa3ff1e5315d22c96 xt/author/pod-spell.t
 SHA1 f0c18c75922a1516ae7a5ec5d391b31fd757f0bd xt/author/pod-syntax.t
@@ -106,17 +107,17 @@ SHA1 34513f89a70b96f6412fe2ef0ad4d475e8cac66c 
xt/release/synopsis.t
 -----BEGIN PGP SIGNATURE-----
 Version: GnuPG v1
 
-iQIcBAEBAgAGBQJXI7uWAAoJEGe9xj410/4d3acP/2NnOVfTgbPXsGc1a5j/+fxn
-a7BwCqBr0FgU4zQfN+Txn93dz/8pybDb2VS4+cQrOf9mWHqfMNMZHMeiskAZIDu9
-ylnmy8N2TKwiwBmFKWAQ7Xk2TriPw6B46+cCdK7eI4LZz5xdA1goTxa3aQe855bq
-9liGTmcLjWSc8fmihFEoE41YrN3zr++CuPl41i/knFaKAU2igvv0bYwM0av1yz+9
-5Pd+EoJHGWwL+JgzOQoWh62MrLHDnycy0qWoC/RTjBuqybadAHFBBhJ361FMOhxV
-+uFPE+E0KLbZSF8rzlfq4qioDy1SByBrRSpY4a/P68RwM+BNVVnQO+gDQwAfFGH6
-lPTu8J1D908klVzxcE0lSTYc5J/gklMQybeWNSV1v4uX8OAJROqa+bxWghT0bvif
-cGcUjYQ9mNV34MxGTAwcq6nJ/WBrmTDdpWNJfKFwJzGF/PHomfJiZvg4gThMkX/3
-T4qcZ4U7HwK7CXQyNFS5XdVrilcug81dcw05ZmZTBF5VT6x1U2mcArb5pJ5FKG/l
-7mHZ7kecrcYyG0EQA2LD4yb9BY7rOY9Z2MQFarV/M1gjHG6hRvgZi+kf1Acyn9le
-JyTX5EN0yxnTo9NTcNuVyMkoK0spQWzoet8hIzgQ7U0DiYBcwlR1FYGIoldmjyAR
-OZ2XxXgp8q4Wes2Ek1el
-=P6gv
+iQIcBAEBAgAGBQJXhYziAAoJEGe9xj410/4d9GsP/0h58/0MMkzL6yvwBJHxCcHY
+Ts/ialILo9uRqWXT4+YBfkYjRb3Mh6NOIyQpKMEQPYT9YH6K5XbOwPjN86zxwEWy
+2x3GPyPJTQLWYPe1nTz9xzOAb+zu9sU7a2T3wbPBZr0gzokXEHBMBYMjRH4fO+pt
+hHORku6ePBprm5SCiP0PjLhfnvEzMPx9d2M7R1p5sJAL+SU26Af0mEBj04NM6M8i
+5yF8yCr1COQYXcGJy7MY5X/yqcBuA6h1B6rtNNF4Jf6ffN1z2YPj8BnpsiU1vo3E
+sIUKBNmniFfx90nPgipFtDfWEwkV0pL3jcxyaR68Wd6pB6pxIc75mP2uxjg+MmSU
+ZACGImOJhT/LGxCf/1ybwGuMX0ajELOIxZ5bgau2Gzriiv2LzQw2XPAWB02TecGQ
+JGDIurNhCizBocL0u5n8EhLgvvTGTL7pg2pJ6+BpsXs+lRiyWO8biygrBr+5vrGS
+nsxVKf2j5y0rUHGdKDumZpydTOFTmXmNRiHkY3UJVSouwKGHnS5DqDznHojtAbeY
+w/oBvk2L+RR2PaPd5ULWOxWz99blyebwyVta/WhNAJdP0/VsESD8WTWZDoABIrR8
+83O8iFP/+wv1Ie8xWCRRxG+SIiPPVVkWkvSRKl5jnsyrIsK8asNFN7gCSbxEYx4B
+PdtJTEC5/c3oqsZurBRw
+=Qtk/
 -----END PGP SIGNATURE-----
diff --git a/lib/File/Util.pm b/lib/File/Util.pm
index e6c719b..da5db5e 100644
--- a/lib/File/Util.pm
+++ b/lib/File/Util.pm
@@ -5,7 +5,7 @@ use warnings;
 use lib 'lib';
 
 package File::Util;
-$File::Util::VERSION = '4.161200';
+$File::Util::VERSION = '4.161950';
 use File::Util::Definitions qw( :all );
 use File::Util::Interface::Modern qw( :all );
 
@@ -113,7 +113,9 @@ sub list_dir {
    my $dir  = shift @_;
    my $opts = ref $_[0] eq 'REF' ? ${ shift @_ } : $this->_remove_opts( \@_ );
 
-   my ( @dir_contents, $subdirs, $files );
+   my @dir_contents;
+
+   my ( $subdirs, $files ) = ( [], [] );
 
    my $abort_depth = $opts->{abort_depth};
 
@@ -2992,7 +2994,7 @@ File::Util - Easy, versatile, portable file handling
 
 =head1 VERSION
 
-version 4.161200
+version 4.161950
 
 =head1 DESCRIPTION
 
diff --git a/lib/File/Util/Cookbook.pod b/lib/File/Util/Cookbook.pod
index 13b1c02..cabf168 100644
--- a/lib/File/Util/Cookbook.pod
+++ b/lib/File/Util/Cookbook.pod
@@ -11,7 +11,7 @@ File::Util::Cookbook - File::Util in Action
 
 =head1 VERSION
 
-version 4.161200
+version 4.161950
 
 =head1 INTRODUCTION
 
diff --git a/lib/File/Util/Definitions.pm b/lib/File/Util/Definitions.pm
index b46f592..e441718 100644
--- a/lib/File/Util/Definitions.pm
+++ b/lib/File/Util/Definitions.pm
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 
 package File::Util::Definitions;
-$File::Util::Definitions::VERSION = '4.161200';
+$File::Util::Definitions::VERSION = '4.161950';
 # ABSTRACT: Global symbols and constants used in most File::Util classes
 
 use Fcntl qw( :flock );
@@ -183,7 +183,7 @@ File::Util::Definitions - Global symbols and constants used 
in most File::Util c
 
 =head1 VERSION
 
-version 4.161200
+version 4.161950
 
 =head1 DESCRIPTION
 
diff --git a/lib/File/Util/Exception.pm b/lib/File/Util/Exception.pm
index e6a27e5..a0acb7e 100644
--- a/lib/File/Util/Exception.pm
+++ b/lib/File/Util/Exception.pm
@@ -4,7 +4,7 @@ use warnings;
 use lib 'lib';
 
 package File::Util::Exception;
-$File::Util::Exception::VERSION = '4.161200';
+$File::Util::Exception::VERSION = '4.161950';
 # ABSTRACT: Base exception class for File::Util
 
 use File::Util::Definitions qw( :all );
@@ -202,7 +202,7 @@ File::Util::Exception - Base exception class for File::Util
 
 =head1 VERSION
 
-version 4.161200
+version 4.161950
 
 =head1 DESCRIPTION
 
diff --git a/lib/File/Util/Exception/Diagnostic.pm 
b/lib/File/Util/Exception/Diagnostic.pm
index 1c1032a..c323360 100644
--- a/lib/File/Util/Exception/Diagnostic.pm
+++ b/lib/File/Util/Exception/Diagnostic.pm
@@ -4,7 +4,7 @@ use warnings;
 use lib 'lib';
 
 package File::Util::Exception::Diagnostic;
-$File::Util::Exception::Diagnostic::VERSION = '4.161200';
+$File::Util::Exception::Diagnostic::VERSION = '4.161950';
 # ABSTRACT: Diagnostic (verbose) error messages
 
 use File::Util::Definitions qw( :all );
@@ -645,7 +645,7 @@ File::Util::Exception::Diagnostic - Diagnostic (verbose) 
error messages
 
 =head1 VERSION
 
-version 4.161200
+version 4.161950
 
 =head1 DESCRIPTION
 
diff --git a/lib/File/Util/Exception/Standard.pm 
b/lib/File/Util/Exception/Standard.pm
index 7260536..10f1140 100644
--- a/lib/File/Util/Exception/Standard.pm
+++ b/lib/File/Util/Exception/Standard.pm
@@ -4,7 +4,7 @@ use warnings;
 use lib 'lib';
 
 package File::Util::Exception::Standard;
-$File::Util::Exception::Standard::VERSION = '4.161200';
+$File::Util::Exception::Standard::VERSION = '4.161950';
 # ABSTRACT: Standard (non-verbose) error messages
 
 use File::Util::Definitions qw( :all );
@@ -277,7 +277,7 @@ File::Util::Exception::Standard - Standard (non-verbose) 
error messages
 
 =head1 VERSION
 
-version 4.161200
+version 4.161950
 
 =head1 DESCRIPTION
 
diff --git a/lib/File/Util/Interface/Classic.pm 
b/lib/File/Util/Interface/Classic.pm
index f3dc175..920b49f 100644
--- a/lib/File/Util/Interface/Classic.pm
+++ b/lib/File/Util/Interface/Classic.pm
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 
 package File::Util::Interface::Classic;
-$File::Util::Interface::Classic::VERSION = '4.161200';
+$File::Util::Interface::Classic::VERSION = '4.161950';
 # ABSTRACT: Legacy call interface to File::Util
 
 use Scalar::Util qw( blessed );
@@ -133,7 +133,7 @@ File::Util::Interface::Classic - Legacy call interface to 
File::Util
 
 =head1 VERSION
 
-version 4.161200
+version 4.161950
 
 =head1 DESCRIPTION
 
diff --git a/lib/File/Util/Interface/Modern.pm 
b/lib/File/Util/Interface/Modern.pm
index 601d92d..a8c0183 100644
--- a/lib/File/Util/Interface/Modern.pm
+++ b/lib/File/Util/Interface/Modern.pm
@@ -2,7 +2,7 @@ use strict;
 use warnings;
 
 package File::Util::Interface::Modern;
-$File::Util::Interface::Modern::VERSION = '4.161200';
+$File::Util::Interface::Modern::VERSION = '4.161950';
 # ABSTRACT: Modern call interface to File::Util
 
 use lib 'lib';
@@ -148,7 +148,7 @@ File::Util::Interface::Modern - Modern call interface to 
File::Util
 
 =head1 VERSION
 
-version 4.161200
+version 4.161950
 
 =head1 DESCRIPTION
 
diff --git a/lib/File/Util/Manual.pod b/lib/File/Util/Manual.pod
index 2832941..986b664 100644
--- a/lib/File/Util/Manual.pod
+++ b/lib/File/Util/Manual.pod
@@ -11,7 +11,7 @@ File::Util::Manual - File::Util Reference
 
 =head1 VERSION
 
-version 4.161200
+version 4.161950
 
 =head1 INTRODUCTION
 
diff --git a/lib/File/Util/Manual/Examples.pod 
b/lib/File/Util/Manual/Examples.pod
index bb1dbeb..85fbad5 100644
--- a/lib/File/Util/Manual/Examples.pod
+++ b/lib/File/Util/Manual/Examples.pod
@@ -11,7 +11,7 @@ File::Util::Manual::Examples - File::Util Examples
 
 =head1 VERSION
 
-version 4.161200
+version 4.161950
 
 =head1 INTRODUCTION
 
diff --git a/t/021_list_dir_regression.t b/t/021_list_dir_regression.t
new file mode 100644
index 0000000..66ee2b1
--- /dev/null
+++ b/t/021_list_dir_regression.t
@@ -0,0 +1,37 @@
+
+use strict;
+use warnings;
+
+# the original intent of this test was to isolate and test solely the
+# list_dir method, but it became immediatley apparent that you can't
+# very well test list_dir() unless you have a good directory tree first;
+# this led to the combining of the make_dir and list_dir testing routines
+
+use Test::More tests => 2;
+use Test::NoWarnings;
+
+use File::Temp qw( tempdir );
+
+use lib './lib';
+use File::Util qw( SL NL OS );
+
+# one recognized instantiation setting
+my $ftl = File::Util->new( );
+
+my $tempdir     = tempdir( CLEANUP => 1 );
+my $testbed     = $tempdir . SL . $$ . SL . time;
+my @test_dirs   = qw/ Fin Rey Kylo Poe /;
+
+for my $tdir ( @test_dirs )
+{
+   $ftl->make_dir( $testbed . SL . $tdir )
+}
+
+is_deeply
+(
+   [ sort $ftl->list_dir( $testbed ) ],
+   [ sort qw( . .. ), @test_dirs  ],
+   'regression: plain dir listing with only subdirs present (no files)'
+);
+
+exit;
diff --git a/xt/author/no-tabs.t b/xt/author/no-tabs.t
index d055ffc..b95e90b 100644
--- a/xt/author/no-tabs.t
+++ b/xt/author/no-tabs.t
@@ -40,6 +40,7 @@ my @files = (
     't/018_list_dir_advancedmatch.t',
     't/019_load_dir.t',
     't/020_write_file.t',
+    't/021_list_dir_regression.t',
     't/txt'
 );
 

-- 
Alioth's /usr/local/bin/git-commit-notice on 
/srv/git.debian.org/git/pkg-perl/packages/libfile-util-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

Reply via email to