From dece2be87db3d369271deec81ff7e644f388d5b0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Jaroslav=20=C5=A0karvada?= Date: Mon, 11 Oct 2010 12:46:39 +0200 Subject: [PATCH] - New version 8.5.9 - Updated make patch - Removed color patch (integrated upstream) - Removed wmiconphoto-fix patch (integrated upstream) --- .gitignore | 1 + sources | 2 +- tk-8.5.7-color.patch | 10 ---- tk-8.5.8-wmiconphoto-fix.patch | 106 --------------------------------- tk.spec | 16 ++--- tk8.5-make.patch | 6 +- 6 files changed, 13 insertions(+), 128 deletions(-) delete mode 100644 tk-8.5.7-color.patch delete mode 100644 tk-8.5.8-wmiconphoto-fix.patch diff --git a/.gitignore b/.gitignore index ba86c1a..f07f559 100644 --- a/.gitignore +++ b/.gitignore @@ -1 +1,2 @@ tk8.5.8-src.tar.gz +/tk8.5.9-src.tar.gz diff --git a/sources b/sources index 9fba77a..8b3d6a3 100644 --- a/sources +++ b/sources @@ -1 +1 @@ -13bf90602e16fc530e05196431021dc6 tk8.5.8-src.tar.gz +7cdeb9feb61593f58a0ae61f2497580e tk8.5.9-src.tar.gz diff --git a/tk-8.5.7-color.patch b/tk-8.5.7-color.patch deleted file mode 100644 index 450ef01..0000000 --- a/tk-8.5.7-color.patch +++ /dev/null @@ -1,10 +0,0 @@ ---- tk8.5.7/generic/tkColor.c.color 2007-12-13 16:24:13.000000000 +0100 -+++ tk8.5.7/generic/tkColor.c 2009-12-09 19:22:12.207246662 +0100 -@@ -302,6 +302,7 @@ - * First, check to see if there's already a mapping for this color name. - */ - -+ memset(&valueKey, 0, sizeof(valueKey)); - valueKey.red = colorPtr->red; - valueKey.green = colorPtr->green; - valueKey.blue = colorPtr->blue; diff --git a/tk-8.5.8-wmiconphoto-fix.patch b/tk-8.5.8-wmiconphoto-fix.patch deleted file mode 100644 index 10cc91d..0000000 --- a/tk-8.5.8-wmiconphoto-fix.patch +++ /dev/null @@ -1,106 +0,0 @@ ---- tk8.5.8/unix/tkUnixWm.c 2009/08/01 08:08:18 1.58.2.3 -+++ tk8.5.8/unix/tkUnixWm.c.new 2009/11/24 15:18:17 1.58.2.4 -@@ -1462,8 +1462,7 @@ - if (wmPtr->clientMachine != NULL) { - ckfree((char *) wmPtr->clientMachine); - } -- wmPtr->clientMachine = (char *) -- ckalloc((unsigned) (length + 1)); -+ wmPtr->clientMachine = ckalloc((unsigned) length + 1); - strcpy(wmPtr->clientMachine, argv3); - if (!(wmPtr->flags & WM_NEVER_MAPPED)) { - XTextProperty textProp; -@@ -1561,7 +1560,7 @@ - return TCL_ERROR; - } - cmapList = (Window *) ckalloc((unsigned) -- ((windowObjc+1)*sizeof(Window))); -+ (windowObjc+1) * sizeof(Window)); - gotToplevel = 0; - for (i = 0; i < windowObjc; i++) { - Tk_Window mapWin; -@@ -2069,7 +2068,7 @@ - } - wmPtr->hints.window_group = Tk_WindowId(wmPtr2->wrapperPtr); - wmPtr->hints.flags |= WindowGroupHint; -- wmPtr->leaderName = ckalloc((unsigned) (length + 1)); -+ wmPtr->leaderName = ckalloc((unsigned) length + 1); - strcpy(wmPtr->leaderName, argv3); - } - UpdateHints(winPtr); -@@ -2297,7 +2296,7 @@ - ckfree((char *) wmPtr->iconName); - } - argv3 = Tcl_GetStringFromObj(objv[3], &length); -- wmPtr->iconName = ckalloc((unsigned) (length + 1)); -+ wmPtr->iconName = ckalloc((unsigned) length + 1); - strcpy(wmPtr->iconName, argv3); - if (!(wmPtr->flags & WM_NEVER_MAPPED)) { - UpdateTitle(winPtr); -@@ -2335,7 +2334,7 @@ - Tk_PhotoHandle photo; - Tk_PhotoImageBlock block; - int i, size = 0, width, height, index = 0, x, y, isDefault = 0; -- unsigned int *iconPropertyData; -+ unsigned long *iconPropertyData; - - if (objc < 4) { - Tcl_WrongNumArgs(interp, 2, objv, -@@ -2375,15 +2374,17 @@ - - /* - * We have calculated the size of the data. Try to allocate the needed -- * memory space. -+ * memory space. This is an unsigned long array (despite this being twice -+ * as much as is really needed on LP64 platforms) because that's what X -+ * defines CARD32 arrays to use. [Bug 2902814] - */ - -- iconPropertyData = (unsigned int *) -- Tcl_AttemptAlloc(sizeof(unsigned int) * size); -+ iconPropertyData = (unsigned long *) -+ attemptckalloc(sizeof(unsigned long) * size); - if (iconPropertyData == NULL) { - return TCL_ERROR; - } -- memset(iconPropertyData, 0, sizeof(unsigned int) * size); -+ memset(iconPropertyData, 0, sizeof(unsigned long) * size); - - for (i = 3 + isDefault; i < objc; i++) { - photo = Tk_FindPhoto(interp, Tcl_GetString(objv[i])); -@@ -2421,7 +2422,7 @@ - for (x = 0; x < width; x++) { - register unsigned char *pixelPtr = - block.pixelPtr + x*block.pixelSize + y*block.pitch; -- register unsigned int R, G, B, A; -+ register unsigned long R, G, B, A; - - R = pixelPtr[block.offset[0]]; - G = pixelPtr[block.offset[1]]; -@@ -3388,7 +3389,7 @@ - ckfree((char *) wmPtr->title); - } - argv3 = Tcl_GetStringFromObj(objv[3], &length); -- wmPtr->title = ckalloc((unsigned) (length + 1)); -+ wmPtr->title = ckalloc((unsigned) length + 1); - strcpy(wmPtr->title, argv3); - - if (!(wmPtr->flags & WM_NEVER_MAPPED)) { -@@ -5982,7 +5983,7 @@ - protPtr = protPtr->nextPtr, count++) { - /* Empty loop body; we're just counting the handlers. */ - } -- arrayPtr = (Atom *) ckalloc((unsigned) (count * sizeof(Atom))); -+ arrayPtr = (Atom *) ckalloc((unsigned) count * sizeof(Atom)); - deleteWindowAtom = Tk_InternAtom((Tk_Window) wmPtr->winPtr, - "WM_DELETE_WINDOW"); - pingAtom = Tk_InternAtom((Tk_Window) wmPtr->winPtr, "_NET_WM_PING"); -@@ -6378,7 +6379,7 @@ - * add the toplevel itself as the last element of the list. - */ - -- newPtr = (Window *) ckalloc((unsigned) ((count+2)*sizeof(Window))); -+ newPtr = (Window *) ckalloc((unsigned) (count+2) * sizeof(Window)); - for (i = 0; i < count; i++) { - newPtr[i] = oldPtr[i]; - } diff --git a/tk.spec b/tk.spec index 9198827..6c16df5 100644 --- a/tk.spec +++ b/tk.spec @@ -1,10 +1,10 @@ %define majorver 8.5 -%define vers %{majorver}.8 +%define vers %{majorver}.9 Summary: The graphical toolkit for the Tcl scripting language Name: tk Version: %{vers} -Release: 2%{?dist} +Release: 1%{?dist} Epoch: 1 License: TCL Group: Development/Languages @@ -25,10 +25,6 @@ Patch1: tk8.5-make.patch Patch2: tk8.5-conf.patch # this patch isn't needed since tk8.6b1 Patch3: tk-seg_input.patch -# RHBZ#545807, this patch is tracked in tk tracker -Patch4: tk-8.5.7-color.patch -# RHBZ#615750 -Patch5: tk-8.5.8-wmiconphoto-fix.patch %description When paired with the Tcl scripting language, Tk provides a fast and powerful @@ -53,8 +49,6 @@ The package contains the development files and man pages for tk. %patch1 -p1 -b .make %patch2 -p1 -b .conf %patch3 -p1 -b .seg -%patch4 -p1 -b .color -%patch5 -p1 -b .wmiconphoto-fix %build cd unix @@ -122,6 +116,12 @@ rm -rf $RPM_BUILD_ROOT %{_mandir}/man3/* %changelog +* Mon Oct 11 2010 Jaroslav Škarvada - 1:8.5.9-1 +- New version 8.5.9 +- Updated make patch +- Removed color patch (integrated upstream) +- Removed wmiconphoto-fix patch (integrated upstream) + * Sun Jul 25 2010 Jaroslav Škarvada - 1:8.5.8-2 - Fixed wm iconphoto #615750 diff --git a/tk8.5-make.patch b/tk8.5-make.patch index 273c92c..27859e2 100644 --- a/tk8.5-make.patch +++ b/tk8.5-make.patch @@ -7,6 +7,6 @@ diff -up tk8.5.2/unix/Makefile.in.ble tk8.5.2/unix/Makefile.in @@INSTALL_LIB@ - @chmod 555 "$(LIB_INSTALL_DIR)"/$(LIB_FILE) + @chmod 755 "$(LIB_INSTALL_DIR)"/$(LIB_FILE) - @if test "$(TK_BUILD_EXP_FILE)" != ""; then \ - echo "Installing $(TK_EXP_FILE) to $(LIB_INSTALL_DIR)/"; \ - $(INSTALL_DATA) $(TK_BUILD_EXP_FILE) \ + @echo "Installing wish@EXEEXT@ as $(BIN_INSTALL_DIR)/wish$(VERSION)@EXEEXT@" + @$(INSTALL_PROGRAM) wish@EXEEXT@ "$(BIN_INSTALL_DIR)"/wish$(VERSION)@EXEEXT@ + @echo "Installing tkConfig.sh to $(CONFIG_INSTALL_DIR)/"