From dc4926ada4bf08a467981a52332174df01a18d58 Mon Sep 17 00:00:00 2001
From: finlayt <finlayt>
Date: Thu, 28 Nov 2002 21:40:57 +0000
Subject: [PATCH] small change so that after loggin in you go back to the same
 page

---
 opac/opac-sidebar.pl | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/opac/opac-sidebar.pl b/opac/opac-sidebar.pl
index c826828a6b..8400e530bf 100755
--- a/opac/opac-sidebar.pl
+++ b/opac/opac-sidebar.pl
@@ -15,4 +15,16 @@ my ($template, $borrowernumber, $cookie)
 			     flagsrequired => {borrow => 1},
 			 });
 
+my @inputs =();
+foreach my $name (param $query) {
+    (next) if ($name eq 'userid' || $name eq 'password');
+    my $value = $query->param($name);
+    push @inputs, {name => $name , value => $value};
+}
+
+$template->param(INPUTS => \@inputs);
+
+my $self_url = $query->url(-absolute => 1);
+$template->param(url => $self_url);
+
 print $query->header(-cookie => $cookie), $template->output;
-- 
2.39.5