From 8576e81ea93b2d57dc4589a81457072e6e4adf8c Mon Sep 17 00:00:00 2001
From: rangi <rangi>
Date: Wed, 22 Oct 2003 20:01:28 +0000
Subject: [PATCH] moving more html out of the script

---
 circ/circulation.pl                                | 14 ++++++++------
 .../intranet-tmpl/default/en/circ/circulation.tmpl |  8 ++++++--
 2 files changed, 14 insertions(+), 8 deletions(-)

diff --git a/circ/circulation.pl b/circ/circulation.pl
index 0a898a9262..e1db535aeb 100755
--- a/circ/circulation.pl
+++ b/circ/circulation.pl
@@ -155,9 +155,13 @@ if ($borrowernumber) {
 ##################################################################################
 # HTML code....
 
-my $responsesform = '';
+my %responseform;
+my @responsearray;
 foreach (keys %responses) {
-    $responsesform.="<input type=hidden name=response-$_ value=$responses{$_}>\n";
+#    $responsesform.="<input type=hidden name=response-$_ value=$responses{$_}>\n";
+    $responseform{'name'}=$_;
+    $responseform{'value'}=$responses{$_};
+    push @responsearray,\%responseform;
 }
 my $questionform;
 my $stickyduedate;
@@ -289,7 +293,6 @@ $template->param(
 		branchname => $branches->{$branch}->{'branchname'},
 		printername => $printers->{$printer}->{'printername'},
 		allowborrow =>$allowborrow,
-
 		#question form
 		question => $question,
 		title => $iteminformation->{'title'},
@@ -304,14 +307,13 @@ $template->param(
 		monthoptions => $monthoptions,
 		yearoptions => $yearoptions,
 		stickyduedate => $stickyduedate,
-		responseform => $responsesform,
 		rejected => $rejected,
 		message => $message,
 		CGIselectborrower => $CGIselectborrower,
-
 		amountold => $amountold,
 		todayissues => \@realtodayissues,
-		previssues => \@realprevissues
+		previssues => \@realprevissues,
+		responseloop => \@responsearray 
 	);
 
 if ($branchcookie) {
diff --git a/koha-tmpl/intranet-tmpl/default/en/circ/circulation.tmpl b/koha-tmpl/intranet-tmpl/default/en/circ/circulation.tmpl
index 170a765339..ecbf92c9d5 100644
--- a/koha-tmpl/intranet-tmpl/default/en/circ/circulation.tmpl
+++ b/koha-tmpl/intranet-tmpl/default/en/circ/circulation.tmpl
@@ -78,7 +78,9 @@
 							<input type=hidden name=stickyduedate value=<TMPL_VAR name="stickyduedate">>
 							<input type=hidden name=branch value=<TMPL_VAR name="branch">>
 							<input type=hidden name=printer value=<TMPL_VAR name="printer">>
-							<TMPL_VAR name="responsesform">
+							<TMPL_LOOP NAME="responseloop">
+							<input type=hidden name="<TMPL_VAR="name">" value="<TMPL_VAR NAME="value">">
+							</TMPL_LOOP>
 							<input type=hidden name=answer value=Y>
 							<input type=submit value=Yes>
 							</form>
@@ -94,7 +96,9 @@
 							<input type=hidden name=stickyduedate value=<TMPL_VAR name="stickyduedate">>
 							<input type=hidden name=branch value=<TMPL_VAR name="branch">>
 							<input type=hidden name=printer value=<TMPL_VAR name="printer">>
-							<TMPL_VAR name="responsesform">
+							<TMPL_LOOP NAME="responseloop">
+							<input type=hidden name="<TMPL_VAR="name">" value="<TMPL_VAR NAME="value">">
+							</TMPL_LOOP>
 							<input type=hidden name=answer value=N>
 							<input type=submit value=No>
 							</form>
-- 
2.39.5