Index: head/textproc/p5-Text-Graphics/files/patch-Graphics.pm
===================================================================
--- head/textproc/p5-Text-Graphics/files/patch-Graphics.pm	(revision 479399)
+++ head/textproc/p5-Text-Graphics/files/patch-Graphics.pm	(nonexistent)
@@ -1,30 +0,0 @@
---- lib/Text/Graphics.pm.orig	Sat Dec 30 20:01:06 2000
-+++ lib/Text/Graphics.pm	Sat Dec 30 20:02:21 2000
-@@ -49,8 +49,8 @@
-   my $child = shift;
-   my $offx = shift;
-   my $offy = shift;
--  $child->{offx} = ($offx > 0) ? $offx : 0;
--  $child->{offy} = ($offy > 0) ? $offy : 0;
-+  $child->{offx} = (defined($offx) && $offx > 0) ? $offx : 0;
-+  $child->{offy} = (defined($offy) && $offy > 0) ? $offy : 0;
-   $child->{parent} = $this;
-   
-   push @{ $this->{children} }, $child;
-@@ -78,7 +78,7 @@
-   my $this = shift;
-   my $gc = shift;
-   
--  if ($this->{bg} ne undef) {
-+  if (defined $this->{bg}) {
-     $gc->fillRect($this->{bg}, 0, 0, $this->{width}, $this->{height});
-   }
- }
-@@ -413,7 +413,7 @@
-   ## we need to re-wrap iff the width changes
-   ##
-   
--  if (($width ne undef) and ($this->{width} != $width)) {
-+  if ((defined $width) and ($this->{width} != $width)) {
-     delete $this->{text_was_wrapped};
-   }

Property changes on: head/textproc/p5-Text-Graphics/files/patch-Graphics.pm
___________________________________________________________________
Deleted: fbsd:nokeywords
## -1 +0,0 ##
-yes
\ No newline at end of property
Deleted: svn:eol-style
## -1 +0,0 ##
-native
\ No newline at end of property
Deleted: svn:mime-type
## -1 +0,0 ##
-text/plain
\ No newline at end of property
Index: head/textproc/p5-Text-Graphics/files/patch-lib_Text_Graphics.pm
===================================================================
--- head/textproc/p5-Text-Graphics/files/patch-lib_Text_Graphics.pm	(nonexistent)
+++ head/textproc/p5-Text-Graphics/files/patch-lib_Text_Graphics.pm	(revision 479400)
@@ -0,0 +1,31 @@
+--- lib/Text/Graphics.pm.orig	1998-06-23 01:00:27 UTC
++++ lib/Text/Graphics.pm
+@@ -49,8 +49,8 @@ sub add {
+   my $child = shift;
+   my $offx = shift;
+   my $offy = shift;
+-  $child->{offx} = ($offx > 0) ? $offx : 0;
+-  $child->{offy} = ($offy > 0) ? $offy : 0;
++  $child->{offx} = (defined($offx) && $offx > 0) ? $offx : 0;
++  $child->{offy} = (defined($offy) && $offy > 0) ? $offy : 0;
+   $child->{parent} = $this;
+   
+   push @{ $this->{children} }, $child;
+@@ -78,7 +78,7 @@ sub _drawBackground {
+   my $this = shift;
+   my $gc = shift;
+   
+-  if ($this->{bg} ne undef) {
++  if (defined $this->{bg}) {
+     $gc->fillRect($this->{bg}, 0, 0, $this->{width}, $this->{height});
+   }
+ }
+@@ -413,7 +413,7 @@ sub setSize {
+   ## we need to re-wrap iff the width changes
+   ##
+   
+-  if (($width ne undef) and ($this->{width} != $width)) {
++  if ((defined $width) and ($this->{width} != $width)) {
+     delete $this->{text_was_wrapped};
+   }
+   

Property changes on: head/textproc/p5-Text-Graphics/files/patch-lib_Text_Graphics.pm
___________________________________________________________________
Added: fbsd:nokeywords
## -0,0 +1 ##
+yes
\ No newline at end of property
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: svn:mime-type
## -0,0 +1 ##
+text/plain
\ No newline at end of property