From 9dc33953f496de3817e59cfcb9bd08ddb1ebadcc Mon Sep 17 00:00:00 2001
From: Chris Cormack <crc@liblime.com>
Date: Mon, 29 Oct 2007 13:21:28 -0500
Subject: [PATCH] Add a referer variable so we can have a back button

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 reports/guided_reports.pl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/reports/guided_reports.pl b/reports/guided_reports.pl
index f1142160d6..1b3e825c7d 100755
--- a/reports/guided_reports.pl
+++ b/reports/guided_reports.pl
@@ -35,6 +35,7 @@ Script to control the guided report creation
 =cut
 
 my $input = new CGI;
+my $referer = $input->referer();
 my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
     {
         template_name   => "reports/guided_reports_start.tmpl",
@@ -555,6 +556,9 @@ elsif ($phase eq 'Delete Definition'){
 	print $input->redirect("/cgi-bin/koha/reports/guided_reports.pl?phase=View%20Dictionary");
 	}
 
+$template->param( 'referer' => $referer );
+
+
 if (!$no_html){
 	output_html_with_http_headers $input, $cookie, $template->output;
 }
-- 
2.39.5