[Koha-cvs] koha/opac getfromintranet.PL opac-membership.pl... [rel_3_0]
Antoine Farnault
antoine at koha-fr.org
Wed Dec 6 11:03:26 CET 2006
CVSROOT: /sources/koha
Module name: koha
Branch: rel_3_0
Changes by: Antoine Farnault <toins> 06/12/06 10:03:26
Removed files:
opac : getfromintranet.PL opac-membership.pl
opac-sidebar.pl
Log message:
theses scripts are unused on rel_3_0.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/opac/getfromintranet.PL?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1&r2=0
http://cvs.savannah.gnu.org/viewcvs/koha/opac/opac-membership.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.5&r2=0
http://cvs.savannah.gnu.org/viewcvs/koha/opac/opac-sidebar.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.6&r2=0
Patches:
Index: getfromintranet.PL
===================================================================
RCS file: getfromintranet.PL
diff -N getfromintranet.PL
--- getfromintranet.PL 19 Jul 2005 02:38:12 -0000 1.1
+++ /dev/null 1 Jan 1970 00:00:00 -0000
@@ -1,7 +0,0 @@
-# New installer helper file
-# Copies detail, moredetail, search, subjectsearch and logout from intranet to opac
-
-$dest = $ARGV[0];
-$src = $dest;
-$src =~ s/opac/intranet/;
-system("cp","-v",$src,$dest);
Index: opac-membership.pl
===================================================================
RCS file: opac-membership.pl
diff -N opac-membership.pl
--- opac-membership.pl 19 Mar 2003 15:14:42 -0000 1.5
+++ /dev/null 1 Jan 1970 00:00:00 -0000
@@ -1,19 +0,0 @@
-#!/usr/bin/perl
-use strict;
-require Exporter;
-use CGI;
-use C4::Auth; # get_template_and_user
-use HTML::Template;
-use C4::Interface::CGI::Output;
-
-my $query = new CGI;
-
-my ($template, $borrowernumber, $cookie)
- = get_template_and_user({template_name => "opac-membership.tmpl",
- query => $query,
- type => "opac",
- authnotrequired => 1,
- flagsrequired => {borrow => 1},
- });
-
-output_html_with_http_headers $query, $cookie, $template->output;
Index: opac-sidebar.pl
===================================================================
RCS file: opac-sidebar.pl
diff -N opac-sidebar.pl
--- opac-sidebar.pl 21 May 2006 02:30:53 -0000 1.6
+++ /dev/null 1 Jan 1970 00:00:00 -0000
@@ -1,32 +0,0 @@
-#!/usr/bin/perl
-use strict;
-require Exporter;
-use CGI;
-
-use C4::Auth; # get_template_and_user
-use HTML::Template;
-
-my $query = new CGI;
-
-my ($template, $borrowernumber, $cookie)
- = get_template_and_user({template_name => "loggedin.tmpl",
- query => $query,
- type => "opac",
- authnotrequired => 1,
- 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,
-);
-
-output_html_with_http_headers $query, $cookie, $template->output;
More information about the Koha-cvs
mailing list