From 4a64ff96caa3eddb15ed84e09b6b5c8b7d614fc8 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ian@liberator.relativity.greenend.org.uk>
Date: Sun, 18 Oct 2009 18:37:47 +0100
Subject: [PATCH] Printable plan: Put generation date near the top with the
 input questions

---
 yarrg/web/routetrade | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

diff --git a/yarrg/web/routetrade b/yarrg/web/routetrade
index b278506..68c727c 100644
--- a/yarrg/web/routetrade
+++ b/yarrg/web/routetrade
@@ -603,6 +603,13 @@ $addcols->({ Total => 0, DoReverse => 1, TotalSubflows => 1 }, qw(
  <li><a href="#dataage">Data age summary</a>
  <li><a href="#trades">Relevant trades</a>
 </ul>
+% } else {
+%	my @tl= gmtime $now or die $!;
+<p>
+Generated by YARRG at <strong><%
+	sprintf "%04d-%02d-%02d %02d:%02d:%02d UTC",
+		$tl[5]+1900, @tl[4,3,2,1,0]
+			|h %></strong>.
 % }
 
 % if ($optimise) { # ========== TRADING PLAN ==========
@@ -840,14 +847,6 @@ END
 <&| query_age:agestable, now => $now, fetchrow => $fetchrow &>
 Islands shown in reverse order of visits.<br>
 </&>
-% } else {
-%	my @tl= gmtime $now or die $!;
-<p>
-Generated by YARRG at <strong><%
-	sprintf "%04d-%02d-%02d %02d:%02d:%02d UTC",
-		$tl[5]+1900, @tl[4,3,2,1,0]
-			|h %></strong>.
-%#	
 % }
 
 % if (!printable($m)) {
-- 
2.30.2