Index: head/databases/mysqltcl/Makefile
===================================================================
--- head/databases/mysqltcl/Makefile	(revision 140592)
+++ head/databases/mysqltcl/Makefile	(revision 140593)
@@ -1,39 +1,44 @@
 # New ports collection makefile for:	mysqltcl
 # Date created:				August 31, 1999
 # Whom:					Mikhail Teterin <mi@aldan.algebra.com>
 #
 # $FreeBSD$
 #
 
 PORTNAME=	mysqltcl
-PORTVERSION=	2.50
+PORTVERSION=	3.01
 CATEGORIES=	databases tcl83 tcl84
 MASTER_SITES=	http://www.xdobry.de/mysqltcl/
 
-MAINTAINER=	mi@aldan.algebra.com
+MAINTAINER=	bkoenig@cs.tu-berlin.de
 COMMENT=	TCL module for accessing MySQL databases based on msqltcl
 
 LIB_DEPENDS=	${TCL_NODOT}:${PORTSDIR}/lang/${TCL_NODOT}
 
 USE_MYSQL=	yes
 TCL_VERSION?=	tcl8.4
 TCL_NODOT=	${TCL_VERSION:S/.//}
 SQL_DIR=	${PREFIX}/lib/${TCL_VERSION}/mysqltcl
 PLIST_SUB+=	TCL_VERSION=${TCL_VERSION} LIB_NAME=${LIB_NAME}
 MANN=		mysqltcl.n
 MAKE_ENV+=	PORTVERSION="${PORTVERSION}" \
 		TCL_VERSION="${TCL_VERSION}" \
 		TCL_NODOT="${TCL_NODOT}"
 MAKEFILE=	${FILESDIR}/Makefile.bsd
 ALL_TARGET=	shlib
+USE_REINPLACE=	yes
+REINPLACE_ARGS=	-i ''
+
+pre-patch:
+	${REINPLACE_CMD} -e 's, *
,,' ${WRKSRC}/generic/*.[ch]
 
 do-install:
 	${MKDIR} ${SQL_DIR}
 	${INSTALL_DATA} ${WRKSRC}/${LIB_NAME} ${SQL_DIR}
 	${ECHO} "package ifneeded mysqltcl ${PORTVERSION} {load ${SQL_DIR}/${LIB_NAME}}" \
 		> ${SQL_DIR}/pkgIndex.tcl
 	${INSTALL_MAN} ${WRKSRC}/doc/${MANN} ${PREFIX}/man/mann
 
 .include <bsd.port.mk>
 
 LIB_NAME!=	${MAKE_ENV} ${MAKE} -f ${FILESDIR}/Makefile.bsd -V SHLIB_NAME

Property changes on: head/databases/mysqltcl/Makefile
___________________________________________________________________
Modified: cvs2svn:cvs-rev
## -1 +1 ##
-1.11
\ No newline at end of property
+1.12
\ No newline at end of property
Index: head/databases/mysqltcl/distinfo
===================================================================
--- head/databases/mysqltcl/distinfo	(revision 140592)
+++ head/databases/mysqltcl/distinfo	(revision 140593)
@@ -1,2 +1,2 @@
-MD5 (mysqltcl-2.50.tar.gz) = 0a1c263ab659ddb0f0927bb10a90bb5d
-SIZE (mysqltcl-2.50.tar.gz) = 143641
+MD5 (mysqltcl-3.01.tar.gz) = 8e3df0d77b78e14680288dce72d79304
+SIZE (mysqltcl-3.01.tar.gz) = 168408

Property changes on: head/databases/mysqltcl/distinfo
___________________________________________________________________
Modified: cvs2svn:cvs-rev
## -1 +1 ##
-1.5
\ No newline at end of property
+1.6
\ No newline at end of property
Index: head/databases/mysqltcl/files/patch-ab
===================================================================
--- head/databases/mysqltcl/files/patch-ab	(revision 140592)
+++ head/databases/mysqltcl/files/patch-ab	(nonexistent)
@@ -1,8 +0,0 @@
---- doc/mysqltcl.n	Mon Jul  6 12:04:27 1998
-+++ doc/mysqltcl.n	Wed Sep  1 01:52:23 1999
-@@ -36,2 +36,5 @@
- MySQLTcl - MySQL server access commands for Tcl
-+.SH SYNOPSIS
-+.P
-+package require mysqltcl
- .SH "INTRODUCTION"

Property changes on: head/databases/mysqltcl/files/patch-ab
___________________________________________________________________
Deleted: cvs2svn:cvs-rev
## -1 +0,0 ##
-1.4
\ No newline at end of property
Deleted: fbsd:nokeywords
## -1 +0,0 ##
-yes
\ No newline at end of property
Index: head/databases/mysqltcl/files/patch-warnings
===================================================================
--- head/databases/mysqltcl/files/patch-warnings	(nonexistent)
+++ head/databases/mysqltcl/files/patch-warnings	(revision 140593)
@@ -0,0 +1,45 @@
+--- generic/mysqltcl.c	Mon Dec 27 07:34:33 2004
++++ generic/mysqltcl.c	Sun Jul 31 19:43:08 2005
+@@ -184,5 +184,4 @@
+ {
+     Tcl_ObjType *oldTypePtr = objPtr->typePtr;
+-    Tcl_HashEntry *entryPtr;
+ 
+     if ((oldTypePtr != NULL) && (oldTypePtr->freeIntRepProc != NULL)) {
+@@ -1389,6 +1388,6 @@
+ {
+   MysqltclState *statePtr = (MysqltclState *)clientData; 
+-  int code ;
+-  int count ;
++  int code = TCL_ERROR;
++  int count = 0;
+ 
+   MysqlTclHandle *handle;
+@@ -1398,5 +1397,4 @@
+   MYSQL_ROW row ;
+   int *val = NULL;
+-  int breakLoop = 0;
+   unsigned long *lengths;
+   
+@@ -1456,13 +1454,8 @@
+       case TCL_CONTINUE:
+       case TCL_OK:
+-	break ;
+-      case TCL_BREAK:
+-	breakLoop=1;
+-	break;
++	continue;
+       default:
+-	breakLoop=1;
+-	break;
+       }
+-      if (breakLoop==1) break;
++      break;
+     }
+   }
+@@ -2150,5 +2143,4 @@
+ static int Mysqltcl_NewNull(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[])
+ {
+-  Tcl_Obj *objPtr;
+   if (objc != 1) {
+       Tcl_WrongNumArgs(interp, 1, objv, "");

Property changes on: head/databases/mysqltcl/files/patch-warnings
___________________________________________________________________
Added: cvs2svn:cvs-rev
## -0,0 +1 ##
+1.1
\ No newline at end of property
Added: fbsd:nokeywords
## -0,0 +1 ##
+yes
\ No newline at end of property