tcltk : moved unused files to obsolete dir

Signed-off-by: Frans Meulenbroeks <fransmeulenbroeks@gmail.com>

5 files changed, 95 insertions, 0 deletions

diff --git a/recipes/obsolete/tcltk/tcl-8.5.8/mips.diff b/recipes/obsolete/tcltk/tcl-8.5.8/mips.diff
new file mode 100644
index 0000000000..59f3e3251f
--- /dev/null
+++ b/recipes/obsolete/tcltk/tcl-8.5.8/mips.diff
@@ -0,0 +1,23 @@
+Patch by Sergei Golovan "fixes" building Tcl 8.5.8 for MIPS architectures
+until a proper solution isn't suggested.
+
+--- tcl8.5-8.5.8.orig/generic/tclStrToD.c
++++ tcl8.5-8.5.8/generic/tclStrToD.c
+@@ -73,7 +73,7 @@
+  * MIPS floating-point units need special settings in control registers
+  * to use gradual underflow as we expect.
+  */
+-#if defined(__mips)
++#if 0 && defined(__mips)
+ #include <sys/fpu.h>
+ #endif
+ /*
+@@ -2166,7 +2166,7 @@
+     } bitwhack;
+ #endif
+ 
+-#if defined(__mips)
++#if 0 && defined(__mips)
+     union fpc_csr mipsCR;
+ 
+     mipsCR.fc_word = get_fpc_csr();
diff --git a/recipes/obsolete/tcltk/tcl-8.5.8/tclport.diff b/recipes/obsolete/tcltk/tcl-8.5.8/tclport.diff
new file mode 100644
index 0000000000..d434663d0c
--- /dev/null
+++ b/recipes/obsolete/tcltk/tcl-8.5.8/tclport.diff
@@ -0,0 +1,14 @@
+Patch by Stanislav Maslovski <stanislav.maslovski@gmail.com>.
+See http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=488491
+
+--- tcl8.5-8.5.8.orig/generic/tclPort.h
++++ tcl8.5-8.5.8/generic/tclPort.h
+@@ -24,7 +24,7 @@
+ #if defined(__WIN32__)
+ #   include "tclWinPort.h"
+ #else
+-#   include "tclUnixPort.h"
++#   include "../unix/tclUnixPort.h"
+ #endif
+ 
+ #if !defined(LLONG_MIN)
diff --git a/recipes/obsolete/tcltk/tk-8.5.8/canvasps.diff b/recipes/obsolete/tcltk/tk-8.5.8/canvasps.diff
new file mode 100644
index 0000000000..5cb9a6ae43
--- /dev/null
+++ b/recipes/obsolete/tcltk/tk-8.5.8/canvasps.diff
@@ -0,0 +1,23 @@
+Patch by Sergei Golovan.
+
+It ensures that font size is positive (measured in pixels). This fixes
+mirrored text problem in canvas postscript output.
+
+--- tk8.5-8.5.5.orig/unix/tkUnixRFont.c
++++ tk8.5-8.5.5/unix/tkUnixRFont.c
+@@ -260,6 +260,7 @@
+     ftFont = GetFont(fontPtr, 0);
+     fontPtr->font.fid = XLoadFont(Tk_Display(tkwin), "fixed");
+     GetTkFontAttributes(ftFont, &fontPtr->font.fa);
++    fontPtr->font.fa.size = TkFontGetPoints(tkwin, fontPtr->font.fa.size);
+     GetTkFontMetrics(ftFont, &fontPtr->font.fm);
+ 
+     return fontPtr;
+@@ -518,6 +519,7 @@
+ 
+     GetTkFontAttributes(ftFont, faPtr);
+     faPtr->underline = fontPtr->font.fa.underline;
++    faPtr->size = TkFontGetPoints(tkwin, faPtr->size);
+     faPtr->overstrike = fontPtr->font.fa.overstrike;
+ }
+ 
diff --git a/recipes/obsolete/tcltk/tk-8.5.8/fontsize.diff b/recipes/obsolete/tcltk/tk-8.5.8/fontsize.diff
new file mode 100644
index 0000000000..a3df0bc29a
--- /dev/null
+++ b/recipes/obsolete/tcltk/tk-8.5.8/fontsize.diff
@@ -0,0 +1,21 @@
+Patch by Sergei Golovan fixes mirroring font in canvas postscript when its
+size is specified in pixels (negative).
+
+--- tk8.5-8.5.4.orig/unix/tkUnixRFont.c
++++ tk8.5-8.5.4/unix/tkUnixRFont.c
+@@ -260,6 +260,7 @@
+     ftFont = GetFont(fontPtr, 0);
+     fontPtr->font.fid = XLoadFont(Tk_Display(tkwin), "fixed");
+     GetTkFontAttributes(ftFont, &fontPtr->font.fa);
++    fontPtr->font.fa.size = TkFontGetPoints(tkwin, fontPtr->font.fa.size);
+     GetTkFontMetrics(ftFont, &fontPtr->font.fm);
+ 
+     return fontPtr;
+@@ -517,6 +518,7 @@
+ 				/* Actual font used to render the character */
+ 
+     GetTkFontAttributes(ftFont, faPtr);
++    faPtr->size = TkFontGetPoints(tkwin, faPtr->size);
+     faPtr->underline = fontPtr->font.fa.underline;
+     faPtr->overstrike = fontPtr->font.fa.overstrike;
+ }
diff --git a/recipes/obsolete/tcltk/tk-8.5.8/tkport.diff b/recipes/obsolete/tcltk/tk-8.5.8/tkport.diff
new file mode 100644
index 0000000000..1f7d072d26
--- /dev/null
+++ b/recipes/obsolete/tcltk/tk-8.5.8/tkport.diff
@@ -0,0 +1,14 @@
+Patch by Stanislav Maslovski <stanislav.maslovski@gmail.com>.
+See http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=488501
+
+--- tk8.5-8.5.8.orig/generic/tkPort.h
++++ tk8.5-8.5.8/generic/tkPort.h
+@@ -29,7 +29,7 @@
+ #   if defined(MAC_OSX_TK)
+ #	include "tkMacOSXPort.h"
+ #   else
+-#	include "tkUnixPort.h"
++#	include "../unix/tkUnixPort.h"
+ #   endif
+ #endif
+