[Koha-cvs] CVS: koha/opac opac-userupdate.pl,1.8,1.9

[Ambrose Li]

Update of /cvsroot/koha/koha/opac
In directory sc8-pr-cvs1:/tmp/cvs-serv26255/opac

Modified Files:
        opac-userupdate.pl 
Log Message:
Updated opac-userupdate.pl to work with 1.3
Copied kohaerror.tmpl from 1.2 for opac-userupdate.pl


Index: opac-userupdate.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-userupdate.pl,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -r1.8 -r1.9
*** opac-userupdate.pl  4 Feb 2003 06:01:52 -0000       1.8
--- opac-userupdate.pl  4 Feb 2003 06:40:05 -0000       1.9
***************
*** 9,12 ****
--- 9,13 ----
  use C4::Koha;
  use C4::Circulation::Circ2;
+ use C4::Interface::CGI::Output;
  use HTML::Template;
  
***************
*** 34,43 ****
  if ($updateemailaddress eq '') {
      warn "KohaAdminEmailAddress system preference not set.  Couldn't send 
patron update information for $borr->{'firstname'} $borr->{'surname'} 
(#$borrowernumber)\n";
!     my $template = gettemplate("kohaerror.tmpl", "opac");
  
      $template->param(errormessage => 'KohaAdminEmailAddress system preference
      is not set.  Please visit the library to update your user record');
  
!     print $query->header(), $template->output;
      exit;
  }
--- 35,50 ----
  if ($updateemailaddress eq '') {
      warn "KohaAdminEmailAddress system preference not set.  Couldn't send 
patron update information for $borr->{'firstname'} $borr->{'surname'} 
(#$borrowernumber)\n";
!     my($template) = get_template_and_user({template_name => "kohaerror.tmpl",
!                            query => $query,
!                            type => "opac",
!                            authnotrequired => 1,
!                            flagsrequired => {borrow => 1},
!                            debug => 1,
!                            });
  
      $template->param(errormessage => 'KohaAdminEmailAddress system preference
      is not set.  Please visit the library to update your user record');
  
!     output_html_with_http_headers $query, $cookie, $template->output;
      exit;
  }
***************
*** 46,52 ****
      # get all the fields:
      my $message = <<"EOF";
! Borrower $borr->{'cardnumber'} 
http://intradev.katipo.co.nz/cgi-bin/koha/moremember.pl?bornum=$borrowernumber
  
! has requested to change their personal details. Please check these new 
details and make the changes:
  EOF
      foreach my $field (@fields){
--- 53,60 ----
      # get all the fields:
      my $message = <<"EOF";
! Borrower $borr->{'cardnumber'}
  
! has requested to change her/his personal details.
! Please check these new details and make the changes:
  EOF
      foreach my $field (@fields){