koha-cvs
[Top][All Lists]
Advanced

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

[Koha-cvs] koha/opac opac-sendbasket.pl [rel_2_2]


From: Joshua Ferraro
Subject: [Koha-cvs] koha/opac opac-sendbasket.pl [rel_2_2]
Date: Thu, 05 Apr 2007 05:12:16 +0000

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_2_2
Changes by:     Joshua Ferraro <kados>  07/04/05 05:12:16

Modified files:
        opac           : opac-sendbasket.pl 

Log message:
        adding borrower data to sendbasket

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/opac/opac-sendbasket.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.4.2.5&r2=1.4.2.6

Patches:
Index: opac-sendbasket.pl
===================================================================
RCS file: /sources/koha/koha/opac/opac-sendbasket.pl,v
retrieving revision 1.4.2.5
retrieving revision 1.4.2.6
diff -u -b -r1.4.2.5 -r1.4.2.6
--- opac-sendbasket.pl  4 Oct 2005 15:26:59 -0000       1.4.2.5
+++ opac-sendbasket.pl  5 Apr 2007 05:12:16 -0000       1.4.2.6
@@ -8,6 +8,7 @@
 
 use C4::Search;
 use C4::Biblio;
+use C4::Circulation::Circ2; #getpatroninfo
 use C4::Auth;
 use C4::Interface::CGI::Output;
 use HTML::Template;
@@ -40,10 +41,17 @@
     = get_template_and_user({template_name => "opac-sendbasket.tmpl",
                             query => $query,
                             type => "opac",
-                            authnotrequired => 1,
+                            authnotrequired => 0, 
#C4::Context->preference("bookbagRequireLogin"),
                             flagsrequired => {borrow => 1},
                         });
 
+       my ($borrowerdata, $borflags ) = getpatroninformation(undef, 
$borrowernumber);
+       unless ( $borrowerdata) {
+               my %borhash = ( cardnumber => "None" ,name => $borrowernumber );
+               $borrowerdata =\%borhash;
+               }
+       $borrowerdata->{'branchname'} = 
getbranchname($borrowerdata->{'branchcode'});
+       
        my @bibs = split(/\//, $bib_list);
        my @results;
        my $iso2709;
@@ -71,7 +79,13 @@
 
        my address@hidden;
        $template2->param(BIBLIO_RESULTS => $resultsarray,
-                                       email_sender => $email_sender);
+                               email_sender => $email_sender,
+                               requester_cardnumber => 
$borrowerdata->{'cardnumber'},
+                               requester_name =>  
"$borrowerdata->{'firstname'} $borrowerdata->{'surname'}",
+                               requester_email => 
$borrowerdata->{'emailaddress'},
+                               requester_branch=> 
$borrowerdata->{'branchname'},
+                               requester_address => 
$borrowerdata->{'streetaddress'},
+                               );
 
        # Getting template result
        my $template_res = $template2->output();




reply via email to

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