1 files changed, 8 insertions, 0 deletions
diff --git a/cpan/Win32/t/GetFolderPath.t b/cpan/Win32/t/GetFolderPath.t
new file mode 100644
index 0000000000..c010c25aa8
--- /dev/null
+++ b/cpan/Win32/t/GetFolderPath.t
@@ -0,0 +1,8 @@
+use strict;
+use Test;
+use Win32;
+
+plan tests => 1;
+
+# "windir" exists back to Win9X; "SystemRoot" only exists on WinNT and later.
+ok(Win32::GetFolderPath(Win32::CSIDL_WINDOWS), $ENV{WINDIR});