widl: Fix typelib lcid fields to match those produced by midl.

This commit is contained in:
Huw Davies 2009-06-09 14:58:28 +01:00 committed by Alexandre Julliard
parent c98ce23fd2
commit 7857219ac1
1 changed files with 6 additions and 2 deletions

View File

@ -141,7 +141,7 @@ static void ctl2_init_header(
typelib->typelib_header.magic1 = 0x5446534d;
typelib->typelib_header.magic2 = 0x00010002;
typelib->typelib_header.posguid = -1;
typelib->typelib_header.lcid = 0x0409; /* or do we use the current one? */
typelib->typelib_header.lcid = 0x0409;
typelib->typelib_header.lcid2 = 0x0;
typelib->typelib_header.varflags = 0x40;
typelib->typelib_header.version = 0;
@ -2362,7 +2362,11 @@ static void set_help_string_context(msft_typelib_t *typelib)
static void set_lcid(msft_typelib_t *typelib)
{
const expr_t *lcid_expr = get_attrp( typelib->typelib->attrs, ATTR_LIBLCID );
typelib->typelib_header.lcid2 = lcid_expr ? lcid_expr->cval : 0x0;
if(lcid_expr)
{
typelib->typelib_header.lcid = lcid_expr->cval;
typelib->typelib_header.lcid2 = lcid_expr->cval;
}
}
static void set_lib_flags(msft_typelib_t *typelib)