oleaut32: Cast-qual warnings fix (Try 2)

[Andrew Talbot]

Please use this one: it also removes a now-redundant cast.

Thanks,

-- Andy.
---
Changelog:
    oleaut32: Cast-qual warnings fix.

diff -urN a/dlls/oleaut32/olefont.c b/dlls/oleaut32/olefont.c
--- a/dlls/oleaut32/olefont.c	2006-08-11 10:59:33.000000000 +0100
+++ b/dlls/oleaut32/olefont.c	2006-09-21 21:09:44.000000000 +0100
@@ -332,10 +332,10 @@
   if (!lpFontDesc) {
     FONTDESC fd;
 
-    static const WCHAR fname[] = { 'S','y','s','t','e','m',0 };
+    static WCHAR fname[] = { 'S','y','s','t','e','m',0 };
 
     fd.cbSizeofstruct = sizeof(fd);
-    fd.lpstrName      = (WCHAR*)fname;
+    fd.lpstrName      = fname;
     fd.cySize.s.Lo    = 80000;
     fd.cySize.s.Hi    = 0;
     fd.sWeight 	      = 0;
diff -urN a/dlls/oleaut32/typelib.c b/dlls/oleaut32/typelib.c
--- a/dlls/oleaut32/typelib.c	2006-09-12 23:59:41.000000000 +0100
+++ b/dlls/oleaut32/typelib.c	2006-09-21 18:40:27.000000000 +0100
@@ -611,14 +611,14 @@
 			    if (RegCreateKeyExW(key, ProxyStubClsidW, 0, NULL, 0,
 				KEY_WRITE, NULL, &subKey, NULL) == ERROR_SUCCESS) {
 				RegSetValueExW(subKey, NULL, 0, REG_SZ,
-					       (BYTE*)PSOA, sizeof PSOA);
+					       (const BYTE *)PSOA, sizeof PSOA);
 				RegCloseKey(subKey);
 			    }
 
 			    if (RegCreateKeyExW(key, ProxyStubClsid32W, 0, NULL, 0,
 				KEY_WRITE, NULL, &subKey, NULL) == ERROR_SUCCESS) {
 				RegSetValueExW(subKey, NULL, 0, REG_SZ,
-					       (BYTE*)PSOA, sizeof PSOA);
+					       (const BYTE *)PSOA, sizeof PSOA);
 				RegCloseKey(subKey);
 			    }