summaryrefslogtreecommitdiff
path: root/win32
diff options
context:
space:
mode:
authorJan Dubois <jand@activestate.com>2005-12-20 08:42:24 -0800
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-12-21 09:23:05 +0000
commit27675a8e700ba7005e0a62604093abd3823685d5 (patch)
treed164bd793f52626a8c2109c5b067e3cb805a270a /win32
parent17fda5459df9207789e2c93a13c6057a90cf1f93 (diff)
downloadperl-27675a8e700ba7005e0a62604093abd3823685d5.tar.gz
Fix bug in change #26379
From: "Jan Dubois" <jand@ActiveState.com> Message-ID: <046001c605c7$69470290$d563a8c0@candy> p4raw-id: //depot/perl@26430
Diffstat (limited to 'win32')
-rw-r--r--win32/win32.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/win32/win32.c b/win32/win32.c
index b09ae94a9f..347bff317e 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -4983,7 +4983,7 @@ Perl_sys_intern_dup(pTHX_ struct interp_intern *src, struct interp_intern *dst)
dst->pseudo_id = 0;
Newxz(dst->pseudo_children, 1, pseudo_child_tab);
dst->timerid = 0;
- w32_message_hwnd = INVALID_HANDLE_VALUE;
+ dst->message_hwnd = INVALID_HANDLE_VALUE;
dst->poll_count = 0;
Copy(src->sigtable,dst->sigtable,SIG_SIZE,Sighandler_t);
}