|
Lines 29-35
use C4::Letters;
Link Here
|
| 29 |
use C4::Output; |
29 |
use C4::Output; |
| 30 |
use C4::Context; |
30 |
use C4::Context; |
| 31 |
|
31 |
|
| 32 |
|
|
|
| 33 |
my $query = new CGI; |
32 |
my $query = new CGI; |
| 34 |
my $op = $query->param('op'); |
33 |
my $op = $query->param('op'); |
| 35 |
my $dbh = C4::Context->dbh; |
34 |
my $dbh = C4::Context->dbh; |
|
Lines 73-79
if ( $selectview eq "full" ) {
Link Here
|
| 73 |
my $yearmin = $subscriptions->[0]->{year}; |
72 |
my $yearmin = $subscriptions->[0]->{year}; |
| 74 |
my $yearmax = $subscriptions->[ -1 ]->{year}; |
73 |
my $yearmax = $subscriptions->[ -1 ]->{year}; |
| 75 |
|
74 |
|
| 76 |
|
|
|
| 77 |
# replace CR by <br> in librarian note |
75 |
# replace CR by <br> in librarian note |
| 78 |
# $subscription->{opacnote} =~ s/\n/\<br\/\>/g; |
76 |
# $subscription->{opacnote} =~ s/\n/\<br\/\>/g; |
| 79 |
|
77 |
|
|
Lines 113-121
else {
Link Here
|
| 113 |
# replace CR by <br> in librarian note |
111 |
# replace CR by <br> in librarian note |
| 114 |
# $subscription->{opacnote} =~ s/\n/\<br\/\>/g; |
112 |
# $subscription->{opacnote} =~ s/\n/\<br\/\>/g; |
| 115 |
|
113 |
|
|
|
114 |
my $title = $subscriptions->[0]->{bibliotitle}; |
| 115 |
|
| 116 |
$template->param( |
116 |
$template->param( |
| 117 |
biblionumber => scalar $query->param('biblionumber'), |
117 |
biblionumber => scalar $query->param('biblionumber'), |
| 118 |
subscription_LOOP => $subscriptions, |
118 |
subscription_LOOP => $subscriptions, |
|
|
119 |
bibliotitle => $title, |
| 119 |
); |
120 |
); |
| 120 |
} |
121 |
} |
| 121 |
output_html_with_http_headers $query, $cookie, $template->output; |
122 |
output_html_with_http_headers $query, $cookie, $template->output; |
| 122 |
- |
|
|