[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