From 1397922cf41173cce92c0022347dc57866e829ee Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 21 Jan 2002 07:32:16 +0000
Subject: fix for pre-5.6 perls

---
 UserAgent.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'UserAgent.pm')

diff --git a/UserAgent.pm b/UserAgent.pm
index bdda2e3..f82b0f6 100644
--- a/UserAgent.pm
+++ b/UserAgent.pm
@@ -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/;
-- 
cgit v1.2.1