aboutsummaryrefslogtreecommitdiff
path: root/net/tcpillust
diff options
context:
space:
mode:
authorPietro Cerutti <gahr@FreeBSD.org>2013-07-08 12:12:18 +0000
committerPietro Cerutti <gahr@FreeBSD.org>2013-07-08 12:12:18 +0000
commit2b7cdc2de5197aaf15675a03fd4737e097e061e1 (patch)
tree9f5b64f07f60dc1cd3514035d13e235cf6c1435d /net/tcpillust
parent96149ef5a5566d5661e1b27e23d1c50775f9e3f2 (diff)
downloadports-2b7cdc2de5197aaf15675a03fd4737e097e061e1.tar.gz
ports-2b7cdc2de5197aaf15675a03fd4737e097e061e1.zip
Notes
Diffstat (limited to 'net/tcpillust')
-rw-r--r--net/tcpillust/Makefile6
-rw-r--r--net/tcpillust/files/patch-tcpillust.c37
2 files changed, 38 insertions, 5 deletions
diff --git a/net/tcpillust/Makefile b/net/tcpillust/Makefile
index 54f8eeb61dcb..b9075f17acbb 100644
--- a/net/tcpillust/Makefile
+++ b/net/tcpillust/Makefile
@@ -1,9 +1,5 @@
-# New ports collection makefile for: tcpillust
-# Date created: 14 April 2000
-# Whom: nishida@sfc.wide.ad.jp
-#
+# Created by: nishida@sfc.wide.ad.jp
# $FreeBSD$
-#
PORTNAME= tcpillust
PORTVERSION= 2.01
diff --git a/net/tcpillust/files/patch-tcpillust.c b/net/tcpillust/files/patch-tcpillust.c
new file mode 100644
index 000000000000..841f2bce6080
--- /dev/null
+++ b/net/tcpillust/files/patch-tcpillust.c
@@ -0,0 +1,37 @@
+--- tcpillust.c.orig 2013-07-08 14:06:59.000000000 +0200
++++ tcpillust.c 2013-07-08 14:09:05.000000000 +0200
+@@ -93,16 +93,16 @@
+ interp = Tcl_CreateInterp();
+
+ if (Tcl_Init(interp) == TCL_ERROR) {
+- fprintf(stderr, "Tcl_Init failed: %s\n", interp->result);
++ fprintf(stderr, "Tcl_Init failed: %s\n", Tcl_GetStringResult(interp));
+ exit(-1);
+ }
+ if (Tk_Init(interp) == TCL_ERROR) {
+- fprintf(stderr, "Tk_Init failed: %s\n", interp->result);
++ fprintf(stderr, "Tk_Init failed: %s\n", Tcl_GetStringResult(interp));
+ exit(-1);
+ }
+ main_tkwin = Tk_MainWindow(interp);
+ if (main_tkwin == NULL) {
+- fprintf(stderr, "%s\n", interp->result);
++ fprintf(stderr, "%s\n", Tcl_GetStringResult(interp));
+ exit(-1);
+ }
+
+@@ -169,12 +169,12 @@
+ {
+ canvas_tkwin = Tk_NameToWindow(interp, ".subframe1.canvas", main_tkwin);
+ if (canvas_tkwin == NULL) {
+- fprintf(stderr, "%s\n", interp->result);
++ fprintf(stderr, "%s\n", Tcl_GetStringResult(interp));
+ exit(-1);
+ }
+ subcanvas_tkwin = Tk_NameToWindow(interp, ".subframe2.canvas", main_tkwin);
+ if (subcanvas_tkwin == NULL) {
+- fprintf(stderr, "%s\n", interp->result);
++ fprintf(stderr, "%s\n", Tcl_GetStringResult(interp));
+ exit(-1);
+ }
+