From 06ad0893496a54e0d0e0ae5bcf5e86e5097b3070 Mon Sep 17 00:00:00 2001 From: ellson Date: Fri, 28 Jan 2005 20:46:29 +0000 Subject: [PATCH] add pie, same as fillpie --- tclpkg/gdtclft/gdtclft.c | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/tclpkg/gdtclft/gdtclft.c b/tclpkg/gdtclft/gdtclft.c index b3cbe5648..216e59a20 100644 --- a/tclpkg/gdtclft/gdtclft.c +++ b/tclpkg/gdtclft/gdtclft.c @@ -148,16 +148,18 @@ static cmdOptions subcmdVec[] = { "gdhandle color cx cy width height start end"}, {"openarc", tclGdArcCmd, 8, 8, 0, 1, "gdhandle color cx cy width height start end"}, - {"fillpie", tclGdArcCmd, 8, 8, 0, 1, - "gdhandle color cx cy width height start end"}, - {"openpie", tclGdArcCmd, 8, 8, 0, 1, - "gdhandle color cx cy width height start end"}, {"chord", tclGdArcCmd, 8, 8, 0, 1, "gdhandle color cx cy width height start end"}, {"fillchord", tclGdArcCmd, 8, 8, 0, 1, "gdhandle color cx cy width height start end"}, {"openchord", tclGdArcCmd, 8, 8, 0, 1, "gdhandle color cx cy width height start end"}, + {"pie", tclGdArcCmd, 8, 8, 0, 1, + "gdhandle color cx cy width height start end"}, + {"fillpie", tclGdArcCmd, 8, 8, 0, 1, + "gdhandle color cx cy width height start end"}, + {"openpie", tclGdArcCmd, 8, 8, 0, 1, + "gdhandle color cx cy width height start end"}, {"polygon", tclGdPolygonCmd, 2, 999, 0, 1, "gdhandle color x1 y1 x2 y2 x3 y3 ..."}, {"fillpolygon", tclGdPolygonCmd, 3, 999, 0, 1, @@ -1053,7 +1055,7 @@ tclGdArcCmd(Tcl_Interp * interp, GdData * gdData, gdImageFilledArc(im, cx, cy, width, height, start, end, color, gdChord); else if (cmd[0] == 'o' && cmd[4] == 'c') /* open chord */ gdImageFilledArc(im, cx, cy, width, height, start, end, color, gdChord | gdEdged | gdNoFill); - else if (cmd[0] == 'f' && cmd[4] == 'p') /* fill pie */ + else if (cmd[0] == 'p' || (cmd[0] == 'f' && cmd[4] == 'p')) /* pie or fill pie */ gdImageFilledArc(im, cx, cy, width, height, start, end, color, gdPie); else if (cmd[0] == 'o' && cmd[4] == 'p') /* open pie */ gdImageFilledArc(im, cx, cy, width, height, start, end, color, gdPie | gdEdged | gdNoFill); -- 2.40.0