X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=UserAgent.pm;h=f82b0f6d5e33e51631493e5e219d7c4f1434acc0;hb=HEAD;hp=bdda2e3164d1f2b37888523141bb945015a1548d;hpb=d0e632b26b3ed0a126599a4b68f9163de4ff6fa4;p=HTTP-Headers-UserAgent.git 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/;