From f5dc836a7e7b1505743663a99cbca48076364817 Mon Sep 17 00:00:00 2001
From: Mikhail Teterin <mi@FreeBSD.org>
Date: Tue, 21 Aug 2001 01:32:30 +0000
Subject: [PATCH] Add back the ability to _read_ GIF images, now that our gd
 has it again.

---
 graphics/gdtclft/Makefile        |  2 +-
 graphics/gdtclft/files/patch-gif | 16 ++++++++++++++++
 2 files changed, 17 insertions(+), 1 deletion(-)
 create mode 100644 graphics/gdtclft/files/patch-gif

diff --git a/graphics/gdtclft/Makefile b/graphics/gdtclft/Makefile
index 9342f0112d22..e5b3f4cd9a36 100644
--- a/graphics/gdtclft/Makefile
+++ b/graphics/gdtclft/Makefile
@@ -7,7 +7,7 @@
 
 PORTNAME=	Gdtclft
 PORTVERSION=	2.2.5
-PORTREVISION=	1
+PORTREVISION=	2
 CATEGORIES=	graphics tcl${TCL_DVER}
 MASTER_SITES=	ftp://ftp.graphviz.org/pub/
 DISTNAME=	${PORTNAME}${PORTVERSION}
diff --git a/graphics/gdtclft/files/patch-gif b/graphics/gdtclft/files/patch-gif
new file mode 100644
index 000000000000..f7dbb16b5b61
--- /dev/null
+++ b/graphics/gdtclft/files/patch-gif
@@ -0,0 +1,16 @@
+--- gdCmd.c	Fri Aug  4 17:11:05 2000
++++ gdCmd.c	Fri Jul 27 16:22:18 2001
+@@ -65,4 +65,6 @@
+ 	{"createFromPNG",	tclGdCreateCmd, 		1, 1,	0, 0,
+ 			"filehandle"},
++	{"createFromGIF",	tclGdCreateCmd, 		1, 1,	0, 0,
++			"filehandle"},
+ 	{"createFromGD",	tclGdCreateCmd, 		1, 1,	0, 0,
+ 			"filehandle"},
+@@ -432,4 +434,6 @@
+ 		} else if (cmd[10] == 'X') {
+ 			im = gdImageCreateFromXbm(filePtr);
++		} else if (cmd[11] == 'I') {
++			im = gdImageCreateFromGif(filePtr);
+ 		} else {
+ 			im = gdImageCreateFromGd(filePtr);