[Koha-cvs] koha/admin marc_subfields_structure.pl [rel_2_2]

[Ryan Higgins]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_2_2
Changes by:     Ryan Higgins <rych>     07/05/10 00:39:14

Modified files:
        admin          : marc_subfields_structure.pl 

Log message:
        bugfix: prev & next links don't include tag or frameworkcode. (but 
these links should be created in template)

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/admin/marc_subfields_structure.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.32.2.11&r2=1.32.2.12

Patches:
Index: marc_subfields_structure.pl
===================================================================
RCS file: /sources/koha/koha/admin/marc_subfields_structure.pl,v
retrieving revision 1.32.2.11
retrieving revision 1.32.2.12
diff -u -b -r1.32.2.11 -r1.32.2.12
--- marc_subfields_structure.pl 20 Jun 2006 16:21:42 -0000      1.32.2.11
+++ marc_subfields_structure.pl 10 May 2007 00:39:14 -0000      1.32.2.12
@@ -380,7 +380,7 @@
        my $dbh = C4::Context->dbh;
        my $sth=$dbh->prepare("select * from marc_subfield_structure where 
tagfield=? and tagsubfield=? and frameworkcode=?");
        #FIXME : called with 2 bind variables when 3 are needed
-       $sth->execute($tagfield,$tagsubfield);
+       $sth->execute($tagfield,$tagsubfield,$frameworkcode);
        my $data=$sth->fetchrow_hashref;
        $sth->finish;
        $template->param(liblibrarian => $data->{'liblibrarian'},
@@ -445,11 +445,11 @@
        
        if ($offset>0) {
                my $prevpage = $offset-$pagesize;
-               $template->param(prev =>"<a 
href=\"$script_name?offset=$prevpage\">");
+               $template->param(prev =>"<a 
href=\"$script_name?tagfield=$tagfield&frameworkcode=$frameworkcode&offset=$prevpage\">");
        }
        if ($offset+$pagesize<$count) {
                my $nextpage =$offset+$pagesize;
-               $template->param(next => "<a 
href=\"$script_name?offset=$nextpage\">");
+               $template->param(next => "<a 
href=\"$script_name?tagfield=$tagfield&frameworkcode=$frameworkcode&offset=$nextpage\">");
        }
 } #---- END $OP eq DEFAULT
 $template->param(intranetcolorstylesheet => 
C4::Context->preference("intranetcolorstylesheet"),