fix for pre-5.6 perls master HTTP_HEADERS_USERAGENT_3_01
authorivan <ivan>
Mon, 21 Jan 2002 07:32:16 +0000 (07:32 +0000)
committerivan <ivan>
Mon, 21 Jan 2002 07:32:16 +0000 (07:32 +0000)
Changes
README
UserAgent.pm
index.html

diff --git a/Changes b/Changes
index 77b5a0b..33d04db 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Revision history for Perl extension HTTP::Headers::UserAgent.
 
+3.01  Sun Jan 20 23:27:57 2002
+       - fix for pre-5.6 perl
+
 3.00  Wed Aug  8 04:20:00 2001
        - depriciated; rewrite as wrapper around HTTP::BrowserDetect
 
diff --git a/README b/README
index 1feed94..df66366 100644 (file)
--- a/README
+++ b/README
@@ -1,6 +1,6 @@
-HTTP::Headers::UserAgent v3.00
+HTTP::Headers::UserAgent v3.01
 
-  Copyright (c) 2001 Ivan Kohler.  All rights reserved.
+  Copyright (c) 2002 Ivan Kohler.  All rights reserved.
   This program is free software; you can redistribute it and/or modify it
   under the same terms as Perl itself.
 
@@ -8,7 +8,7 @@ This is a class that deals with the HTTP User-Agent header.  It will parse
 the header, and (hopefully) report the correct platform, operating system,
 browser, and browser version.
 
-This is version 3.00 of the HTTP::Headers::UserAgent class.  It is now
+This is version 3.01 of the HTTP::Headers::UserAgent class.  It is now
 depriciated, and the code is a wrapper around the more well-maintained
 HTTP::BrowserDetect module.  You are advised to switch to HTTP::BrowserDetect.
 While the interface provides backward-compatibility with version 1.00, it is
index bdda2e3..f82b0f6 100644 (file)
@@ -6,7 +6,7 @@ use HTTP::BrowserDetect;
 
 use vars qw( $VERSION @EXPORT_OK $fh %old );
 
-$VERSION = '3.00';
+$VERSION = '3.01';
 
 @EXPORT_OK = qw( GetPlatform );
 
@@ -160,7 +160,7 @@ sub os {
     linux
     dec bsd
   ) ) {
-    $os ||= $possible if $self->{'bd'}->$possible;
+    $os ||= $possible if $self->{'bd'}->$possible();
   }
   $os = 'macos' if $os =~ /^mac/;
   $os = 'osf1' if $os =~ /^dec/;
index 3fea4df..be517a6 100644 (file)
@@ -1,9 +1,9 @@
 <HTML><HEAD><TITLE>HTTP::Headers::UserAgent - parse User-Agent headers</TITLE></HEAD>
 <BODY>
 <PRE>
-HTTP::Headers::UserAgent v3.00
+HTTP::Headers::UserAgent v3.01
 
-Copyright (c) 2001 Ivan Kohler.  All rights reserved.
+Copyright (c) 2002 Ivan Kohler.  All rights reserved.
 This program is free software; you can redistribute it and/or modify it under
 the same terms as Perl itself.
 
@@ -11,13 +11,13 @@ This is a class that deals with the HTTP User-Agent header.  It will parse
 the header, and (hopefully) report the correct platform, operating system,
 browser, and browser version.
 
-This is version 3.00 of the HTPP::Headers::UserAgent class.  <FONT SIZE="+2"><B>It is now
+This is version 3.01 of the HTPP::Headers::UserAgent class.  <FONT SIZE="+2"><B>It is now
 depriciated</B></FONT>, and the code is a wrapper around the more well-maintained
 <a href="http://search.cpan.org/search?dist=HTTP-BrowserDetect">HTTP::BrowserDetect module</a>.  You are advised to switch to <a href="http://search.cpan.org/search?dist=HTTP-BrowserDetect">HTTP::BrowserDetect</a>.
 While the interface provides backward-compatibility with version 1.00, it is
 not based on the 1.00 code.
 
-<a href="HTTP-Headers-UserAgent-3.00.tar.gz">Download HTTP-Headers-UserAgent v3.00</a>
+<a href="HTTP-Headers-UserAgent-3.01.tar.gz">Download HTTP-Headers-UserAgent v3.01</a>
 
 To install:
        perl Makefile.PL