X-Git-Url: http://git.imager.perl.org/imager.git/blobdiff_plain/ee064fb9325012c14354fbb756d98d1943969a0d..b08d7b0d5dab97bceb9b9776c5e92c3cadb80d4e:/fills.c

diff --git a/fills.c b/fills.c
index 6b464823..ea586476 100644
--- a/fills.c
+++ b/fills.c
@@ -429,7 +429,7 @@ If C<cust_hatch> is NULL then one of the standard hatches is used.
 
 (C<dx>, C<dy>) are an offset into the hatch which can be used to hatch
 adjoining areas out of alignment, or to align the origin of a hatch
-with the the side of a filled area.
+with the side of a filled area.
 
 =cut
 */
@@ -457,7 +457,7 @@ If C<cust_hatch> is NULL then one of the standard hatches is used.
 
 (C<dx>, C<dy>) are an offset into the hatch which can be used to hatch
 adjoining areas out of alignment, or to align the origin of a hatch
-with the the side of a filled area.
+with the side of a filled area.
 
 =cut
 */
@@ -720,7 +720,7 @@ fill_hatch(i_fill_t *fill, i_img_dim x, i_img_dim y, i_img_dim width,
 
 The floating sample fill function for hatched fills.
 
-=back
+=cut
 */
 static void
 fill_hatchf(i_fill_t *fill, i_img_dim x, i_img_dim y, i_img_dim width,