Added a rewrite rule so the Str255 argument of GetControlTitle is seen as
output parameter.
diff --git a/Mac/Modules/ctl/Ctlmodule.c b/Mac/Modules/ctl/Ctlmodule.c
index 07fff29..42a82d9 100644
--- a/Mac/Modules/ctl/Ctlmodule.c
+++ b/Mac/Modules/ctl/Ctlmodule.c
@@ -462,13 +462,12 @@
{
PyObject *_res = NULL;
Str255 title;
- if (!PyArg_ParseTuple(_args, "O&",
- PyMac_GetStr255, title))
+ if (!PyArg_ParseTuple(_args, ""))
return NULL;
GetControlTitle(_self->ob_itself,
title);
- Py_INCREF(Py_None);
- _res = Py_None;
+ _res = Py_BuildValue("O&",
+ PyMac_BuildStr255, title);
return _res;
}
@@ -952,7 +951,7 @@
{"SetControlTitle", (PyCFunction)CtlObj_SetControlTitle, 1,
"(Str255 title) -> None"},
{"GetControlTitle", (PyCFunction)CtlObj_GetControlTitle, 1,
- "(Str255 title) -> None"},
+ "() -> (Str255 title)"},
{"GetControlValue", (PyCFunction)CtlObj_GetControlValue, 1,
"() -> (SInt16 _rv)"},
{"SetControlValue", (PyCFunction)CtlObj_SetControlValue, 1,