From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 8 Jun 2002 12:14:48 +0000 (+0000)
Subject: Advertise the upcoming Win32::GetOSName().
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7939d86b6493e69ec9cce44090fe18827c92abfa;p=p5sagit%2Fp5-mst-13.2.git

Advertise the upcoming Win32::GetOSName().

p4raw-id: //depot/perl@17086
---

diff --git a/pod/perlport.pod b/pod/perlport.pod
index fa1d70b..0ebd3f6 100644
--- a/pod/perlport.pod
+++ b/pod/perlport.pod
@@ -832,8 +832,9 @@ Win32::GetOSVersion().  For example:
         print +('3.1','95','NT')[$os_version_info[4]],"\n";
     }
 
-There are also Win32::IsWinNT() and Win32::IsWin95(), try
-C<perldoc Win32>.  The very portable POSIX::uname() will work too:
+There are also Win32::IsWinNT() and Win32::IsWin95(), try C<perldoc Win32>,
+and as of libwin32 0.19 (not part of the core Perl distribution)
+Win32::GetOSName().  The very portable POSIX::uname() will work too:
 
     c:\> perl -MPOSIX -we "print join '|', uname"
     Windows NT|moonru|5.0|Build 2195 (Service Pack 2)|x86