koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha/value_builder unimarc_field_210c.pl,1.6,1.7


From: Paul POULAIN
Subject: [Koha-cvs] CVS: koha/value_builder unimarc_field_210c.pl,1.6,1.7
Date: Wed, 24 Nov 2004 12:30:09 -0800

Update of /cvsroot/koha/koha/value_builder
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9619/value_builder

Modified Files:
        unimarc_field_210c.pl 
Log Message:
bugfix in editor chooser

Index: unimarc_field_210c.pl
===================================================================
RCS file: /cvsroot/koha/koha/value_builder/unimarc_field_210c.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** unimarc_field_210c.pl       23 Sep 2004 16:33:13 -0000      1.6
--- unimarc_field_210c.pl       24 Nov 2004 20:30:06 -0000      1.7
***************
*** 20,30 ****
  # Suite 330, Boston, MA  02111-1307 USA
  
! use strict;
  use C4::Auth;
- use CGI;
  use C4::Context;
- use HTML::Template;
- use C4::Search;
  use C4::Output;
  
  =head1
--- 20,34 ----
  # Suite 330, Boston, MA  02111-1307 USA
  
! require Exporter;
! use C4::AuthoritiesMarc;
  use C4::Auth;
  use C4::Context;
  use C4::Output;
+ use C4::Interface::CGI::Output;
+ use CGI;
+ use C4::Search;
+ use MARC::Record;
+ use C4::Koha;
+ use HTML::Template;
  
  =head1
***************
*** 104,109 ****
  function Clic$function_name(subfield_managed) {
        
defaultvalue=escape(document.forms[0].field_value[subfield_managed].value);
!       newin=window.open(\"../authorities/authorities-home.pl\",\"value 
builder\",'width=500,height=400,toolbar=false,scrollbars=yes');
! 
  }
  </script>
--- 108,112 ----
  function Clic$function_name(subfield_managed) {
        
defaultvalue=escape(document.forms[0].field_value[subfield_managed].value);
!       
newin=window.open(\"../plugin_launcher.pl?plugin_name=unimarc_field_210c.pl&index=\"+subfield_managed,\"unimarc
 225a\",'width=500,height=600,toolbar=false,scrollbars=no');
  }
  </script>
***************
*** 122,129 ****
        my $index = $input->param("index");
        my $result =  $input->param("result");
!       $result=~s/ /&nbsp;/g;
!       $result=~s/"/&quot;/g;
!       print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0; 
URL=thesaurus_popup.pl?category=EDITORS&nohierarchy=1&index=$index&result=$result\"></html>";
!       exit;
  }
  
--- 125,246 ----
        my $index = $input->param("index");
        my $result =  $input->param("result");
! 
!       my $query=new CGI;
!       my $op = $query->param('op');
!       my $authtypecode = $query->param('authtypecode');
!       my $index = $query->param('index');
!       my $category = $query->param('category');
!       my $resultstring = $query->param('result');
!       my $dbh = C4::Context->dbh;
!       
!       my $startfrom=$query->param('startfrom');
!       $startfrom=0 if(!defined $startfrom);
!       my ($template, $loggedinuser, $cookie);
!       my $resultsperpage;
!       
!       my $authtypes = getauthtypes;
!       my @authtypesloop;
!       foreach my $thisauthtype (keys %$authtypes) {
!               my $selected = 1 if $thisauthtype eq $authtypecode;
!               my %row =(value => $thisauthtype,
!                                       selected => $selected,
!                                       authtypetext => 
$authtypes->{$thisauthtype}{'authtypetext'},
!                               index => $index,
!                               );
!               push @authtypesloop, \%row;
!       }
! 
!       if ($op eq "do_search") {
!               my @marclist = $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');
!       
!               $resultsperpage= $query->param('resultsperpage');
!               $resultsperpage = 19 if(!defined $resultsperpage);
!       
!               # builds tag and subfield arrays
!               my @tags;
!       
!               my ($results,$total) = authoritysearch($dbh, 
address@hidden,address@hidden,
!                                                                               
        address@hidden, address@hidden, address@hidden,
!                                                                               
        $startfrom*$resultsperpage, $resultsperpage,$authtypecode);# $orderby);
!       
!               ($template, $loggedinuser, $cookie)
!                       = get_template_and_user({template_name => 
"value_builder/unimarc_field_210c.tmpl",
!                                       query => $query,
!                                       type => 'intranet',
!                                       authnotrequired => 0,
!                                       flagsrequired => {borrowers => 1},
!                                       flagsrequired => {catalogue => 1},
!                                       debug => 1,
!                                       });
!       
!               # multi page display gestion
!               my $displaynext=0;
!               my $displayprev=$startfrom;
!               if(($total - (($startfrom+1)*($resultsperpage))) > 0 ) {
!                       $displaynext = 1;
!               }
!       
!               my @numbers = ();
!       
!               if ($total>$resultsperpage) {
!                       for (my $i=1; $i<$total/$resultsperpage+1; $i++) {
!                               if ($i<16) {
!                                       my $highlight=0;
!                                       ($startfrom==($i-1)) && ($highlight=1);
!                                       push @numbers, { number => $i,
!                                               highlight => $highlight ,
!                                               startfrom => ($i-1)};
!                               }
!                       }
!               }
!       
!               my $from = $startfrom*$resultsperpage+1;
!               my $to;
!       
!               if($total < (($startfrom+1)*$resultsperpage)) {
!                       $to = $total;
!               } else {
!                       $to = (($startfrom+1)*$resultsperpage);
!               }
!               $template->param(result => $results) if $results;
!               $template->param(index => $query->param('index'));
!               $template->param(startfrom=> $startfrom,
!                                                               displaynext=> 
$displaynext,
!                                                               displayprev=> 
$displayprev,
!                                                               resultsperpage 
=> $resultsperpage,
!                                                               startfromnext 
=> $startfrom+1,
!                                                               startfromprev 
=> $startfrom-1,
!                                                               index => $index,
!                                                               total=>$total,
!                                                               from=>$from,
!                                                               to=>$to,
!                                                               
numbers=>address@hidden,
!                                                               authtypecode 
=>$authtypecode,
!                                                               resultstring 
=>$value[0],
!                                                               );
!       } else {
!               ($template, $loggedinuser, $cookie)
!                       = get_template_and_user({template_name => 
"value_builder/unimarc_field_210c.tmpl",
!                                       query => $query,
!                                       type => 'intranet',
!                                       authnotrequired => 0,
!                                       flagsrequired => {catalogue => 1},
!                                       debug => 1,
!                                       });
!       
!               $template->param(index => $index,
!                                               resultstring => $resultstring
!                                               );
!       }
!       
!       $template->param(authtypesloop => address@hidden);
!       $template->param(category => $category);
!       
!       # Print the page
!       output_html_with_http_headers $query, $cookie, $template->output;
  }
  




reply via email to

[Prev in Thread] Current Thread [Next in Thread]