MSI: test MsiSummaryInfoGetProperty reading an empty property

[Mike McCormack]

ChangeLog:
* test MsiSummaryInfoGetProperty reading an empty property
-------------- next part --------------
Index: dlls/msi/tests/suminfo.c
===================================================================
RCS file: /home/wine/wine/dlls/msi/tests/suminfo.c,v
retrieving revision 1.1
diff -u -p -r1.1 suminfo.c
--- dlls/msi/tests/suminfo.c	19 Mar 2005 17:08:34 -0000	1.1
+++ dlls/msi/tests/suminfo.c	20 Apr 2005 03:11:37 -0000
@@ -69,6 +69,7 @@ START_TEST(suminfo)
     UINT r, count, type;
     INT val;
     FILETIME ft;
+    char buf[0x10];
 
     DeleteFile(msifile);
 
@@ -107,6 +108,15 @@ START_TEST(suminfo)
     ok(r == ERROR_SUCCESS, "getpropcount failed\n");
     ok(type == 0, "wrong type\n");
     ok(val == 1234, "wrong val\n");
+
+    buf[0]='x';
+    buf[1]=0;
+    count = 0x10;
+    r = MsiSummaryInfoGetProperty(hsuminfo, PID_REVNUMBER, &type, &val, NULL, buf, &count);
+    ok(r == ERROR_SUCCESS, "getpropcount failed\n");
+    ok(buf[0]=='x', "cleared buffer\n");
+    ok(count == 0x10, "count wasn't zero\n");
+    ok(type == VT_EMPTY, "should be empty\n");
 
     r = MsiSummaryInfoSetProperty(hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "Mike");
     ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");