aboutsummaryrefslogtreecommitdiffstats
path: root/net/tcpillust
diff options
context:
space:
mode:
authorgahr <gahr@FreeBSD.org>2013-07-08 20:12:18 +0800
committergahr <gahr@FreeBSD.org>2013-07-08 20:12:18 +0800
commit97e6978ff710246f7a9e9df95c04da44fa2b9759 (patch)
tree9f5b64f07f60dc1cd3514035d13e235cf6c1435d /net/tcpillust
parenta1cd8c740abfc69c3e9e41e93aa17bb26bbdb86c (diff)
downloadfreebsd-ports-gnome-97e6978ff710246f7a9e9df95c04da44fa2b9759.tar.gz
freebsd-ports-gnome-97e6978ff710246f7a9e9df95c04da44fa2b9759.tar.zst
freebsd-ports-gnome-97e6978ff710246f7a9e9df95c04da44fa2b9759.zip
- Fix build with Tcl/Tk 8.6 [1]
- While at it, trim Makefile headers Reported by: bapt [1]
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);
+ }
+