diff options
author | gahr <gahr@FreeBSD.org> | 2013-07-08 20:12:18 +0800 |
---|---|---|
committer | gahr <gahr@FreeBSD.org> | 2013-07-08 20:12:18 +0800 |
commit | 97e6978ff710246f7a9e9df95c04da44fa2b9759 (patch) | |
tree | 9f5b64f07f60dc1cd3514035d13e235cf6c1435d /net/tcpillust | |
parent | a1cd8c740abfc69c3e9e41e93aa17bb26bbdb86c (diff) | |
download | freebsd-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/Makefile | 6 | ||||
-rw-r--r-- | net/tcpillust/files/patch-tcpillust.c | 37 |
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); + } + |