mirror/freebsd-ports
1
0
Fork 0
mirror of https://git.FreeBSD.org/ports.git synced 2024-10-20 20:09:11 +00:00
Code Issues Releases Activity

- Fix build with Tcl/Tk 8.6

Browse Source 
Reported by:	bapt
This commit is contained in:
Pietro Cerutti 2013-07-24 07:30:43 +00:00
parent 0ba4f15cff
commit 269e71880e
Notes: svn2git 2021-03-31 03:12:20 +00:00 
svn path=/head/; revision=323575
2 changed files with 17 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
net/zebra-server/Makefile
View File

@ -24,7 +24,7 @@ CONFIGURE_ARGS= --with-yaz=${LOCALBASE}/bin \
USES= iconv
USE_LDCONFIG= yes
USE_TCL= 84+
USE_TCL= yes
MAN1= idzebra-config-2.0.1 zebraidx-2.0.1
MAN8= zebrasrv-2.0.8

16
net/zebra-server/files/patch-index_mod_grs_regx.c Normal file
View File

@ -0,0 +1,16 @@
--- index/mod_grs_regx.c.orig 2010-06-29 10:57:13.000000000 +0200
+++ index/mod_grs_regx.c 2013-07-24 09:27:20.000000000 +0200
@@ -1298,8 +1298,12 @@
{
const char *err = Tcl_GetVar(spec->tcl_interp, "errorInfo", 0);
yaz_log(YLOG_FATAL, "Tcl error, line=%d, \"%s\"\n%s",
+#if TCL_MAJOR_VERSION == 8 && TCL_MINOR_VERSION < 5
spec->tcl_interp->errorLine,
- spec->tcl_interp->result,
+#else
+ Tcl_GetErrorLine(spec->tcl_interp),
+#endif
+ Tcl_GetStringResult(spec->tcl_interp),
err ? err : "[NO ERRORINFO]");
}
}