summaryrefslogtreecommitdiff
path: root/cpan
diff options
context:
space:
mode:
authorJan Dubois <jand@activestate.com>2011-01-12 13:10:55 -0800
committerJan Dubois <jand@activestate.com>2011-01-12 13:10:55 -0800
commited47cbae1475c99fdcfd2a4da98c33346acd6d9a (patch)
treeff193cb83a83d0a3581e6c94684a129a3e0209c4 /cpan
parent2ae3110b76299590fc3db9d4cb26cd7b80c3b796 (diff)
downloadperl-ed47cbae1475c99fdcfd2a4da98c33346acd6d9a.tar.gz
Update to Win32-0.44 from CPAN
Diffstat (limited to 'cpan')
-rw-r--r--cpan/Win32/Changes3
-rw-r--r--cpan/Win32/Win32.pm2
-rw-r--r--cpan/Win32/Win32.xs1
3 files changed, 5 insertions, 1 deletions
diff --git a/cpan/Win32/Changes b/cpan/Win32/Changes
index 7a425971d2..dbbb4ff94e 100644
--- a/cpan/Win32/Changes
+++ b/cpan/Win32/Changes
@@ -1,5 +1,8 @@
Revision history for the Perl extension Win32.
+0.44 [2011-01-12]
+ - fix memory leak introduced in 0.43
+
0.43 [2011-01-12]
- fix a few potential buffer overrun bugs reported by Alex Davies.
[perl#78710]
diff --git a/cpan/Win32/Win32.pm b/cpan/Win32/Win32.pm
index cfc5bb9160..d37352a41b 100644
--- a/cpan/Win32/Win32.pm
+++ b/cpan/Win32/Win32.pm
@@ -8,7 +8,7 @@ package Win32;
require DynaLoader;
@ISA = qw|Exporter DynaLoader|;
- $VERSION = '0.43';
+ $VERSION = '0.44';
$XS_VERSION = $VERSION;
$VERSION = eval $VERSION;
diff --git a/cpan/Win32/Win32.xs b/cpan/Win32/Win32.xs
index 9c4ea33c81..8af0e888c6 100644
--- a/cpan/Win32/Win32.xs
+++ b/cpan/Win32/Win32.xs
@@ -1524,6 +1524,7 @@ XS(w32_GetLongPathName)
wcscpy(wide_path, wstr);
long_path = my_longpathW(wide_path);
if (long_path) {
+ Safefree(wstr);
ST(0) = wstr_to_sv(aTHX_ long_path);
XSRETURN(1);
}