[libfile-which-perl] 01/03: Imported Upstream version 1.18

[dom at earth.li]

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

dom pushed a commit to branch master
in repository libfile-which-perl.

commit 37f62f1c9bd705ff5755e958f0d3eac340daefef
Author: Dominic Hargreaves <dom at earth.li>
Date:   Tue May 5 12:07:02 2015 +0100

    Imported Upstream version 1.18
---
 Changes           |  3 +++
 META.json         |  2 +-
 META.yml          |  2 +-
 Makefile.PL       |  2 +-
 README            |  2 +-
 dist.ini          |  2 +-
 lib/File/Which.pm | 18 ++++++++++--------
 7 files changed, 18 insertions(+), 13 deletions(-)

diff --git a/Changes b/Changes
index 85efbbb..d9fef35 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Revision history for File-Which
 
+1.18      2015-05-04 15:35:40 -0400
+  - Remove prototypes (gh#6)
+
 1.17      2015-05-01 07:06:00 -0400
   - Removed pwhich as forwarned in 1.10
   - Migrated to Dist::Zilla (relevant only for development)
diff --git a/META.json b/META.json
index 6e46762..9e596fc 100644
--- a/META.json
+++ b/META.json
@@ -46,6 +46,6 @@
          "web" : "https://github.com/plicease/File-Which"
       }
    },
-   "version" : "1.17"
+   "version" : "1.18"
 }
 
diff --git a/META.yml b/META.yml
index 85c60ea..1d3cfc2 100644
--- a/META.yml
+++ b/META.yml
@@ -23,4 +23,4 @@ resources:
   bugtracker: https://github.com/plicease/File-Which/issues
   homepage: http://perl.wdlabs.com/File-Which
   repository: git://github.com/plicease/File-Which.git
-version: '1.17'
+version: '1.18'
diff --git a/Makefile.PL b/Makefile.PL
index 4d3a678..88b3eae 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -27,7 +27,7 @@ my %WriteMakefileArgs = (
   "TEST_REQUIRES" => {
     "Test::More" => "0.94"
   },
-  "VERSION" => "1.17",
+  "VERSION" => "1.18",
   "test" => {
     "TESTS" => "t/*.t"
   }
diff --git a/README b/README
index 6b34f78..4d65c7b 100644
--- a/README
+++ b/README
@@ -4,7 +4,7 @@ NAME
 
 VERSION
 
-    version 1.17
+    version 1.18
 
 SYNOPSIS
 
diff --git a/dist.ini b/dist.ini
index 0d608c3..79d4e0e 100644
--- a/dist.ini
+++ b/dist.ini
@@ -5,7 +5,7 @@ author           = Graham Ollis <plicease at cpan.org>
 license          = Perl_5
 copyright_holder = Per Einar Ellefsen <pereinar at cpan.org>
 copyright_year   = 2002
-version          = 1.17
+version          = 1.18
 
 [@Author::Plicease]
 release_tests      = 1
diff --git a/lib/File/Which.pm b/lib/File/Which.pm
index b01aa29..4c84c7c 100644
--- a/lib/File/Which.pm
+++ b/lib/File/Which.pm
@@ -7,17 +7,19 @@ use Exporter   ();
 use File::Spec ();
 
 # ABSTRACT: Perl implementation of the which utility as an API
-our $VERSION = '1.17'; # VERSION
+our $VERSION = '1.18'; # VERSION
 
 
 our @ISA       = 'Exporter';
 our @EXPORT    = 'which';
 our @EXPORT_OK = 'where';
 
-use constant IS_VMS => ($^O eq 'VMS');
-use constant IS_MAC => ($^O eq 'MacOS');
-use constant IS_DOS => ($^O eq 'MSWin32' or $^O eq 'dos' or $^O eq 'os2');
-use constant IS_CYG => ($^O eq 'cygwin');
+use constant {
+  IS_VMS => ($^O eq 'VMS'),
+  IS_MAC => ($^O eq 'MacOS'),
+  IS_DOS => ($^O eq 'MSWin32' or $^O eq 'dos' or $^O eq 'os2'),
+  IS_CYG => ($^O eq 'cygwin'),
+};
 
 # For Win32 systems, stores the extensions used for
 # executable files
@@ -41,7 +43,7 @@ if ( IS_DOS ) {
 }
 
 
-sub which ($) {
+sub which {
   my ($exec) = @_;
 
   return undef unless $exec;
@@ -126,7 +128,7 @@ sub which ($) {
 }
 
 
-sub where ($) {
+sub where {
   # force wantarray
   my @res = which($_[0]);
   return @res;
@@ -146,7 +148,7 @@ File::Which - Perl implementation of the which utility as an API
 
 =head1 VERSION
 
-version 1.17
+version 1.18
 
 =head1 SYNOPSIS
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libfile-which-perl.git