Lines 730-735
attempts to submit the email.
Link Here
|
730 |
|
730 |
|
731 |
sub generic_confirm { |
731 |
sub generic_confirm { |
732 |
my ( $self, $params ) = @_; |
732 |
my ( $self, $params ) = @_; |
|
|
733 |
my $branch = Koha::Libraries->find($params->{current_branchcode}) |
734 |
|| die "Invalid current branchcode. Are you logged in as the database user?"; |
733 |
if ( !$params->{stage}|| $params->{stage} eq 'init' ) { |
735 |
if ( !$params->{stage}|| $params->{stage} eq 'init' ) { |
734 |
my $draft->{subject} = "ILL Request"; |
736 |
my $draft->{subject} = "ILL Request"; |
735 |
$draft->{body} = <<EOF; |
737 |
$draft->{body} = <<EOF; |
Lines 753-760
Kind Regards
Link Here
|
753 |
|
755 |
|
754 |
EOF |
756 |
EOF |
755 |
|
757 |
|
756 |
my $branch = Koha::Libraries->find($params->{current_branchcode}) |
|
|
757 |
|| die "Invalid current branchcode. Are you logged in as the database user?"; |
758 |
my @address = map { $branch->$_ } |
758 |
my @address = map { $branch->$_ } |
759 |
qw/ branchname branchaddress1 branchaddress2 branchaddress3 |
759 |
qw/ branchname branchaddress1 branchaddress2 branchaddress3 |
760 |
branchzip branchcity branchstate branchcountry branchphone |
760 |
branchzip branchcity branchstate branchcountry branchphone |
761 |
- |
|
|