Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | add selected tk upstream changes |
|---|---|
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
a78599ba2a6c4bf07de7fe6367f66461 |
| User & Date: | chw 2019-09-10 07:31:11 |
Context
|
2019-09-10
| ||
| 07:31 | add selected tcl upstream changes check-in: 14be88eae4 user: chw tags: trunk | |
| 07:31 | add selected tk upstream changes check-in: a78599ba2a user: chw tags: trunk | |
|
2019-09-09
| ||
| 07:14 | add selected tcl upstream changes check-in: be205a221e user: chw tags: trunk | |
Changes
Changes to jni/sdl2tk/macosx/tkMacOSXWm.c.
5826
5827
5828
5829
5830
5831
5832
5833
5834
5835
5836
5837
5838
5839
5840
....
5927
5928
5929
5930
5931
5932
5933
5934
5935
5936
5937
5938
5939
5940
5941
|
NSString *idString;
NSWindow *win = TkMacOSXDrawableWindow(winPtr->window);
if (win) {
idString = win.tabbingIdentifier;
result = Tcl_NewStringObj(idString.UTF8String, [idString length]);
}
if (result == NULL) {
NSLog(@"Failed to read tabbing identifier; try calling update before getting/setting the tabbing identifier of the window.");
return TCL_OK;
}
Tcl_SetObjResult(interp, result);
if (objc == 3) {
return TCL_OK;
} else if (objc == 4) {
int len;
................................................................................
resultString = appearanceStrings[APPEARANCE_DARKAQUA];
}
#endif // MAC_OS_X_VERSION_MAX_ALLOWED >= 101400
}
result = Tcl_NewStringObj(resultString, strlen(resultString));
}
if (result == NULL) {
NSLog(@"Failed to read appearance name; try calling update before getting/setting the appearance of the window.");
return TCL_OK;
}
if (objc == 4) {
int index;
if (Tcl_GetIndexFromObjStruct(interp, objv[3], appearanceStrings,
sizeof(char *), "appearancename", 0, &index) != TCL_OK) {
return TCL_ERROR;
|
|
|
|
5826
5827
5828
5829
5830
5831
5832
5833
5834
5835
5836
5837
5838
5839
5840
....
5927
5928
5929
5930
5931
5932
5933
5934
5935
5936
5937
5938
5939
5940
5941
|
NSString *idString;
NSWindow *win = TkMacOSXDrawableWindow(winPtr->window);
if (win) {
idString = win.tabbingIdentifier;
result = Tcl_NewStringObj(idString.UTF8String, [idString length]);
}
if (result == NULL) {
NSLog(@"Failed to read tabbing identifier; try calling update idletasks before getting/setting the tabbing identifier of the window.");
return TCL_OK;
}
Tcl_SetObjResult(interp, result);
if (objc == 3) {
return TCL_OK;
} else if (objc == 4) {
int len;
................................................................................
resultString = appearanceStrings[APPEARANCE_DARKAQUA];
}
#endif // MAC_OS_X_VERSION_MAX_ALLOWED >= 101400
}
result = Tcl_NewStringObj(resultString, strlen(resultString));
}
if (result == NULL) {
NSLog(@"Failed to read appearance name; try calling update idletasks before getting/setting the appearance of the window.");
return TCL_OK;
}
if (objc == 4) {
int index;
if (Tcl_GetIndexFromObjStruct(interp, objv[3], appearanceStrings,
sizeof(char *), "appearancename", 0, &index) != TCL_OK) {
return TCL_ERROR;
|