[Python-checkins] CVS: python/dist/src/Mac/Modules/ctl _Ctlmodule.c,1.8,1.9
Jack Jansen
jackjansen@users.sourceforge.net
Fri, 14 Dec 2001 14:47:16 -0800
Update of /cvsroot/python/python/dist/src/Mac/Modules/ctl
In directory usw-pr-cvs1:/tmp/cvs-serv15874/Python/Mac/Modules/ctl
Modified Files:
_Ctlmodule.c
Log Message:
Many of the new calls are Carbon-only. Flagged them as such.
Index: _Ctlmodule.c
===================================================================
RCS file: /cvsroot/python/python/dist/src/Mac/Modules/ctl/_Ctlmodule.c,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** _Ctlmodule.c 2001/12/13 21:24:37 1.8
--- _Ctlmodule.c 2001/12/14 22:47:13 1.9
***************
*** 597,600 ****
--- 597,602 ----
}
+ #if TARGET_API_MAC_CARBON
+
static PyObject *CtlObj_SetControlTitleWithCFString(ControlObject *_self, PyObject *_args)
{
***************
*** 615,618 ****
--- 617,623 ----
[...1467 lines suppressed...]
{"CreatePopupButtonControl", (PyCFunction)Ctl_CreatePopupButtonControl, 1,
"(WindowPtr window, Rect boundsRect, CFStringRef title, SInt16 menuID, Boolean variableWidth, SInt16 titleWidth, SInt16 titleJustification, Style titleStyle) -> (ControlHandle outControl)"},
+ #endif
+
+ #if TARGET_API_MAC_CARBON
{"CreateRadioGroupControl", (PyCFunction)Ctl_CreateRadioGroupControl, 1,
"(WindowPtr window, Rect boundsRect) -> (ControlHandle outControl)"},
+ #endif
+
+ #if TARGET_API_MAC_CARBON
{"CreateScrollingTextBoxControl", (PyCFunction)Ctl_CreateScrollingTextBoxControl, 1,
"(WindowPtr window, Rect boundsRect, SInt16 contentResID, Boolean autoScroll, UInt32 delayBeforeAutoScroll, UInt32 delayBetweenAutoScroll, UInt16 autoScrollAmount) -> (ControlHandle outControl)"},
+ #endif
+
+ #if TARGET_API_MAC_CARBON
{"CreateDataBrowserControl", (PyCFunction)Ctl_CreateDataBrowserControl, 1,
"(WindowPtr window, Rect boundsRect, OSType style) -> (ControlHandle outControl)"},
+ #endif
{"FindControlUnderMouse", (PyCFunction)Ctl_FindControlUnderMouse, 1,
"(Point inWhere, WindowPtr inWindow) -> (ControlHandle _rv, SInt16 outPart)"},