[Koha-cvs] koha/opac opac-authorities-home.pl [rel_2_2]

[paul poulain]

CVSROOT:        /cvsroot/koha
Module name:    koha
Branch:         rel_2_2
Changes by:     paul poulain <address@hidden>   06/03/08 14:39:59

Modified files:
        opac           : opac-authorities-home.pl 

Log message:
        removing useless code (copy-paste from intranet, useless in OPAC)

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/opac/opac-authorities-home.pl.diff?only_with_tag=rel_2_2&tr1=1.1.2.3&tr2=1.1.2.4&r1=text&r2=text

Patches:
Index: koha/opac/opac-authorities-home.pl
diff -u koha/opac/opac-authorities-home.pl:1.1.2.3 
koha/opac/opac-authorities-home.pl:1.1.2.4
--- koha/opac/opac-authorities-home.pl:1.1.2.3  Mon Mar  6 19:44:08 2006
+++ koha/opac/opac-authorities-home.pl  Wed Mar  8 14:39:59 2006
@@ -141,94 +141,6 @@
                                                        isEDITORS => 
$authtypecode eq 'EDITORS',
                                                        );
 
-} elsif ($op eq "delete") {
-
-       &AUTHdelauthority($dbh,$authid, 1);
-
-       ($template, $loggedinuser, $cookie)
-               = get_template_and_user({template_name => 
"authorities/authorities-home.tmpl",
-                               query => $query,
-                               type => 'intranet',
-                               authnotrequired => 0,
-                               flagsrequired => {catalogue => 1},
-                               debug => 1,
-                               });
-#      $template->param("statements" => address@hidden,
-#                                              "nbstatements" => 
$nbstatements);
-}
-elsif ($op eq "AddStatement") {
-
-       ($template, $loggedinuser, $cookie)
-               = get_template_and_user({template_name => 
"authorities/authorities-home.tmpl",
-                               query => $query,
-                               type => 'intranet',
-                               authnotrequired => 0,
-                               flagsrequired => {catalogue => 1},
-                               debug => 1,
-                               });
-
-       # Gets the entered information
-       my @marcfields = $query->param('marclist');
-       my @and_or = $query->param('and_or');
-       my @excluding = $query->param('excluding');
-       my @operator = $query->param('operator');
-       my @value = $query->param('value');
-
-       my @statements = ();
-
-       # List of the marc tags to display
-       my $marcarray = create_marclist();
-
-       my $nbstatements = $query->param('nbstatements');
-       $nbstatements = 1 if(!defined $nbstatements);
-
-       for(my $i = 0 ; $i < $nbstatements ; $i++)
-       {
-               my %fields = ();
-
-               # Recreates the old scrolling lists with the previously 
selected values
-               my $marclist = create_scrolling_list({name=>"marclist",
-                                       values=> $marcarray,
-                                       size=> 1,
-                                       default=>$marcfields[$i],
-                                       onChange => "sql_update()"}
-                                       );
-
-               $fields{'marclist'} = $marclist;
-               $fields{'first'} = 1 if($i == 0);
-
-               # Restores the and/or parameters (no need to test the 'and' for 
activation because it's the default value)
-               $fields{'or'} = 1 if($and_or[$i] eq "or");
-
-               #Restores the "not" parameters
-               $fields{'not'} = 1 if($excluding[$i]);
-
-               #Restores the operators (most common operators first);
-               if($operator[$i] eq "=") { $fields{'eq'} = 1; }
-               elsif($operator[$i] eq "contains") { $fields{'contains'} = 1; }
-               elsif($operator[$i] eq "start") { $fields{'start'} = 1; }
-               elsif($operator[$i] eq ">") { $fields{'gt'} = 1; }      
#greater than
-               elsif($operator[$i] eq ">=") { $fields{'ge'} = 1; } #greater or 
equal
-               elsif($operator[$i] eq "<") { $fields{'lt'} = 1; } #lower than
-               elsif($operator[$i] eq "<=") { $fields{'le'} = 1; } #lower or 
equal
-
-               #Restores the value
-               $fields{'value'} = $value[$i];
-
-               push @statements, \%fields;
-       }
-       $nbstatements++;
-
-       # The new scrolling list
-       my $marclist = create_scrolling_list({name=>"marclist",
-                               values=> $marcarray,
-                               size=>1,
-                               onChange => "sql_update()"});
-       push @statements, {"marclist" => $marclist };
-
-       $template->param("statements" => address@hidden,
-                                               "nbstatements" => 
$nbstatements);
-
 }
 else {
        ($template, $loggedinuser, $cookie)
@@ -242,12 +154,6 @@
 }
 
 $template->param(authtypesloop => address@hidden,
-                               LibraryName => 
C4::Context->preference("LibraryName"),
-                                OpacNav => C4::Context->preference("OpacNav"),
-                                opaccredits => 
C4::Context->preference("opaccredits"),
-                                opacsmallimage => 
C4::Context->preference("opacsmallimage"),
-                                opaclayoutstylesheet => 
C4::Context->preference("opaclayoutstylesheet"),
-                                opaccolorstylesheet => 
C4::Context->preference("opaccolorstylesheet"),
                );
 
 # Print the page