From 213cc83c478faeaa7ce442acdead34e83c10c7a8 Mon Sep 17 00:00:00 2001
From: "\"Steven J. Hill\"" <sjhill@realitydiluted.com>
Date: Fri, 7 Jul 2006 02:05:09 +0000
Subject: [PATCH] Fix syntax errors in configure and m4 for Tcl so that the
 package actually builds. This was reported on the Tcl mailing list at
 <http://sourceforge.net/mailarchive/forum.php?thread_id=9384126&forum_id=3854>.

---
 package/tcl/tcl-configure-syntax-error.patch | 42 ++++++++++++++++++++
 1 file changed, 42 insertions(+)
 create mode 100644 package/tcl/tcl-configure-syntax-error.patch

diff --git a/package/tcl/tcl-configure-syntax-error.patch b/package/tcl/tcl-configure-syntax-error.patch
new file mode 100644
index 0000000000..b22e974493
--- /dev/null
+++ b/package/tcl/tcl-configure-syntax-error.patch
@@ -0,0 +1,42 @@
+diff -ur tcl8.4.9/unix/configure tcl8.4.9-patched/unix/configure
+--- tcl8.4.9/unix/configure	2004-12-06 18:23:45.000000000 -0600
++++ tcl8.4.9-patched/unix/configure	2006-07-06 21:02:18.884355250 -0500
+@@ -2131,7 +2131,7 @@
+ 	    # results, and the version is kept in special file).
+ 	
+ 	    if test -r /etc/.relid -a "X`uname -n`" = "X`uname -s`" ; then
+-		system=MP-RAS-`awk '{print }' /etc/.relid'`
++		system=MP-RAS-`awk '{print }' /etc/.relid`
+ 	    fi
+ 	    if test "`uname -s`" = "AIX" ; then
+ 		system=AIX-`uname -v`.`uname -r`
+@@ -7322,7 +7322,7 @@
+ 	    # results, and the version is kept in special file).
+ 	
+ 	    if test -r /etc/.relid -a "X`uname -n`" = "X`uname -s`" ; then
+-		system=MP-RAS-`awk '{print }' /etc/.relid'`
++		system=MP-RAS-`awk '{print }' /etc/.relid`
+ 	    fi
+ 	    if test "`uname -s`" = "AIX" ; then
+ 		system=AIX-`uname -v`.`uname -r`
+diff -ur tcl8.4.9/unix/tcl.m4 tcl8.4.9-patched/unix/tcl.m4
+--- tcl8.4.9/unix/tcl.m4	2004-12-06 18:23:45.000000000 -0600
++++ tcl8.4.9-patched/unix/tcl.m4	2006-07-06 21:02:35.653403250 -0500
+@@ -844,7 +844,7 @@
+ 	    # results, and the version is kept in special file).
+ 	
+ 	    if test -r /etc/.relid -a "X`uname -n`" = "X`uname -s`" ; then
+-		system=MP-RAS-`awk '{print $3}' /etc/.relid'`
++		system=MP-RAS-`awk '{print $3}' /etc/.relid`
+ 	    fi
+ 	    if test "`uname -s`" = "AIX" ; then
+ 		system=AIX-`uname -v`.`uname -r`
+@@ -2190,7 +2190,7 @@
+ 	    # results, and the version is kept in special file).
+ 	
+ 	    if test -r /etc/.relid -a "X`uname -n`" = "X`uname -s`" ; then
+-		system=MP-RAS-`awk '{print $3}' /etc/.relid'`
++		system=MP-RAS-`awk '{print $3}' /etc/.relid`
+ 	    fi
+ 	    if test "`uname -s`" = "AIX" ; then
+ 		system=AIX-`uname -v`.`uname -r`
-- 
2.30.2