Lines Matching refs:cm
41 CursorManager *cm = (CursorManager*)clientData;
42 if (cm->timer) {
43 Tcl_DeleteTimerHandler(cm->timer);
54 CursorManager *cm = (CursorManager *) Tcl_GetAssocData(interp, cm_key,0);
56 if (!cm) {
57 cm = (CursorManager*)ckalloc(sizeof(*cm));
58 cm->timer = 0;
59 cm->owner = 0;
60 cm->onTime = DEF_CURSOR_ON_TIME;
61 cm->offTime = DEF_CURSOR_OFF_TIME;
62 Tcl_SetAssocData(interp,cm_key,CursorManagerDeleteProc,(ClientData)cm);
64 return cm;
73 CursorManager *cm = (CursorManager*)clientData;
76 if (cm->owner->flags & CURSOR_ON) {
77 cm->owner->flags &= ~CURSOR_ON;
78 blinkTime = cm->offTime;
80 cm->owner->flags |= CURSOR_ON;
81 blinkTime = cm->onTime;
83 cm->timer = Tcl_CreateTimerHandler(blinkTime, CursorBlinkProc, clientData);
84 TtkRedisplayWidget(cm->owner);
90 static void LoseCursor(CursorManager *cm, WidgetCore *corePtr)
96 if (cm->owner == corePtr) {
97 cm->owner = NULL;
99 if (cm->timer) {
100 Tcl_DeleteTimerHandler(cm->timer);
101 cm->timer = 0;
108 static void ClaimCursor(CursorManager *cm, WidgetCore *corePtr)
110 if (cm->owner == corePtr)
112 if (cm->owner)
113 LoseCursor(cm, cm->owner);
118 cm->owner = corePtr;
119 cm->timer = Tcl_CreateTimerHandler(cm->onTime, CursorBlinkProc, cm);
137 CursorManager *cm = GetCursorManager(corePtr->interp);
141 if (cm->owner == corePtr)
142 LoseCursor(cm, corePtr);
148 ClaimCursor(cm, corePtr);
152 LoseCursor(cm, corePtr);