SetListCellIndent() argument was guessed incorrectly. Fixed.

diff --git a/Mac/Modules/list/Listmodule.c b/Mac/Modules/list/Listmodule.c
index 338b6111efce8f9973eb26ee8d861f094e3d5585..050981224b1824b564a11c62f078b58bfb487d45 100644 (file)
--- a/Mac/Modules/list/Listmodule.c
+++ b/Mac/Modules/list/Listmodule.c
@@ -893,13 +893,14 @@ static PyObject *List_SetListCellIndent(_self, _args)
        PyObject *_res = NULL;
        ListHandle list;
        Point indent;
-       if (!PyArg_ParseTuple(_args, "O&",
-                             ListObj_Convert, &list))
+       if (!PyArg_ParseTuple(_args, "O&O&",
+                             ListObj_Convert, &list,
+                             PyMac_GetPoint, &indent))
                return NULL;
        SetListCellIndent(list,
                          &indent);
-       _res = Py_BuildValue("O&",
-                            PyMac_BuildPoint, indent);
+       Py_INCREF(Py_None);
+       _res = Py_None;
        return _res;
 }
 
@@ -1039,7 +1040,7 @@ static PyMethodDef List_methods[] = {
        {"SetListPort", (PyCFunction)List_SetListPort, 1,
         "(ListHandle list, CGrafPtr port) -> None"},
        {"SetListCellIndent", (PyCFunction)List_SetListCellIndent, 1,
-        "(ListHandle list) -> (Point indent)"},
+        "(ListHandle list, Point indent) -> None"},
        {"SetListClickTime", (PyCFunction)List_SetListClickTime, 1,
         "(ListHandle list, SInt32 time) -> None"},
        {"SetListRefCon", (PyCFunction)List_SetListRefCon, 1,

diff --git a/Mac/Modules/list/listscan.py b/Mac/Modules/list/listscan.py
index b8bd549dd1d704834da7a45c49a49ead311d7a87..faf81c038b0271f289657c1968383c9066daf6d5 100644 (file)
--- a/Mac/Modules/list/listscan.py
+++ b/Mac/Modules/list/listscan.py
@@ -74,16 +74,10 @@ class MyScanner(Scanner):
                        ([("void", "*", "OutMode"), ("short", "*", "OutMode")],
                         [("VarOutBufferShortsize", "*", "InOutMode")]),
                        
-#                      ([("void", "wStorage", "OutMode")],
-#                       [("NullStorage", "*", "InMode")]),
-#                      
-#                      # GetKeys
-#                      ([('KeyMap', 'theKeys', 'InMode')],
-#                       [('*', '*', 'OutMode')]),
-#                       
-#                      # GetTicker
-#                      ([('unsigned long', '*', '*')],
-#                       [('unsigned_long', '*', '*')]),
+                       # SetListCellIndent doesn't have const
+                       ([("Point", "indent", "OutMode")],
+                        [("Point_ptr", "indent", "InMode")]),
+                       
                        ]
 
        def writeinitialdefs(self):