inetcomm/tests: Add test for IMimeInternational_GetDefaultCharset.
This commit is contained in:
parent
8b68a6296c
commit
4271524b8a
|
@ -181,10 +181,29 @@ static void test_charset(void)
|
||||||
IMimeInternational_Release(internat);
|
IMimeInternational_Release(internat);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static void test_defaultcharset(void)
|
||||||
|
{
|
||||||
|
IMimeInternational *internat;
|
||||||
|
HRESULT hr;
|
||||||
|
HCHARSET hcs_default, hcs;
|
||||||
|
|
||||||
|
hr = MimeOleGetInternat(&internat);
|
||||||
|
ok(hr == S_OK, "ret %08x\n", hr);
|
||||||
|
|
||||||
|
hr = IMimeInternational_GetDefaultCharset(internat, &hcs_default);
|
||||||
|
ok(hr == S_OK, "ret %08x\n", hr);
|
||||||
|
hr = IMimeInternational_GetCodePageCharset(internat, GetACP(), CHARSET_BODY, &hcs);
|
||||||
|
ok(hr == S_OK, "ret %08x\n", hr);
|
||||||
|
ok(hcs_default == hcs, "Unexpected default charset\n");
|
||||||
|
|
||||||
|
IMimeInternational_Release(internat);
|
||||||
|
}
|
||||||
|
|
||||||
START_TEST(mimeintl)
|
START_TEST(mimeintl)
|
||||||
{
|
{
|
||||||
OleInitialize(NULL);
|
OleInitialize(NULL);
|
||||||
test_create();
|
test_create();
|
||||||
test_charset();
|
test_charset();
|
||||||
|
test_defaultcharset();
|
||||||
OleUninitialize();
|
OleUninitialize();
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue