From c56fd5c9a0b24a3181cb067ef78e4d984e30fa7a Mon Sep 17 00:00:00 2001
From: hjp <hjp>
Date: Sat, 17 Feb 2007 12:55:22 +0000
Subject: [PATCH] Adapted and commented postscript test.

---
 t/3missing.t | 42 ++++++++++++++++++++++++++----------------
 1 file changed, 26 insertions(+), 16 deletions(-)

diff --git a/t/3missing.t b/t/3missing.t
index aace333..d5ad70c 100644
--- a/t/3missing.t
+++ b/t/3missing.t
@@ -12,29 +12,39 @@ $ts->add(0, 100);
 $ts->add(1000, 200);
 $ts->add(2000, 100);
 $ts->add(3000, undef);
-$ts->add(4000, 100);
+$ts->add(4000, 150);
 $ts->add(5000, 200);
 $ts->add(6000, 100);
 $ts->legend('missing');
 my $p = $ts->plot();
-my $t = "LT0
-6395 4739 M
-399 0 V
-574 1344 M
-1639 4872 L
-2703 1344 L
-2130 0 R
-5897 4872 L
-6962 1344 L
+# Postscript file visually inspected and copied postscript code.
+# The real graph is the MLLMLL pattern. The MVVVL after it is the 
+# bounding rectangle, so we could compute if the coordinates are 
+# correct, if we wanted to.
+
+# open(my $fh, '>:raw', "t/3missing.ps");
+# print $fh $p;
+# close($fh);
+my $t = "
+LT0
+6607 4807 M
+303 0 V
+410 960 M
+1513 4920 L
+2617 960 L
+4823 2940 M
+5927 4920 L
+7030 960 L
 1.000 UL
 LTb
-574 1344 M
-6388 0 V
-0 3528 V
--6388 0 V
-0 -3528 V
+410 960 M
+6620 0 V
+0 3960 V
+-6620 0 V
+410 960 L
 1.000 UP
-stroke";
+stroke
+";
 ok(index($p, $t) != -1,		'postscript output looks ok');
 
 #vim:tw=0