From 90e08c66fa60e0134a2fa0faa1d1b97485338d2d Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Fri, 30 Jun 2000 02:21:02 +0000 Subject: [PATCH] Check VERSIONs. p4raw-id: //depot/cfgperl@6289 --- lib/File/Spec/Mac.pm | 2 +- lib/File/Spec/OS2.pm | 4 +++- lib/File/Spec/VMS.pm | 4 +++- lib/File/Spec/Win32.pm | 2 +- 4 files changed, 8 insertions(+), 4 deletions(-) diff --git a/lib/File/Spec/Mac.pm b/lib/File/Spec/Mac.pm index 857ca1b..e1a462e 100644 --- a/lib/File/Spec/Mac.pm +++ b/lib/File/Spec/Mac.pm @@ -1,7 +1,7 @@ package File::Spec::Mac; use strict; -use vars qw(@ISA); +use vars qw(@ISA $VERSION); require File::Spec::Unix; $VERSION = '1.2'; diff --git a/lib/File/Spec/OS2.pm b/lib/File/Spec/OS2.pm index 33370f0..fc328db 100644 --- a/lib/File/Spec/OS2.pm +++ b/lib/File/Spec/OS2.pm @@ -1,10 +1,12 @@ package File::Spec::OS2; use strict; -use vars qw(@ISA); +use vars qw(@ISA $VERSION); require File::Spec::Unix; @ISA = qw(File::Spec::Unix); +$VERSION = 1.0; + sub devnull { return "/dev/nul"; } diff --git a/lib/File/Spec/VMS.pm b/lib/File/Spec/VMS.pm index 56b5506..ec20289 100644 --- a/lib/File/Spec/VMS.pm +++ b/lib/File/Spec/VMS.pm @@ -1,10 +1,12 @@ package File::Spec::VMS; use strict; -use vars qw(@ISA); +use vars qw(@ISA $VERSION); require File::Spec::Unix; @ISA = qw(File::Spec::Unix); +$VERSION = 1.0; + use Cwd; use File::Basename; use VMS::Filespec; diff --git a/lib/File/Spec/Win32.pm b/lib/File/Spec/Win32.pm index 1c2b44f..b863dc4 100644 --- a/lib/File/Spec/Win32.pm +++ b/lib/File/Spec/Win32.pm @@ -2,7 +2,7 @@ package File::Spec::Win32; use strict; use Cwd; -use vars qw(@ISA); +use vars qw(@ISA $VERSION); require File::Spec::Unix; $VERSION = '1.2'; -- 2.7.4