Lines 91-98
if ($error){
Link Here
|
91 |
print $query->end_html(); |
91 |
print $query->end_html(); |
92 |
} |
92 |
} |
93 |
else { |
93 |
else { |
94 |
print $query->header( |
94 |
if ($format eq 'marc8'){ |
95 |
-type => 'application/octet-stream', |
95 |
print $query->header( |
96 |
-attachment=>"bib-$biblionumber.$format"); |
96 |
-type => 'application/marc', |
97 |
print $marc; |
97 |
-charset=>'ISO-2022', |
|
|
98 |
-attachment=>"bib-$biblionumber.$format"); |
99 |
}else{ |
100 |
print $query->header( |
101 |
-type => 'application/octet-stream', |
102 |
-charset=>'utf-8', |
103 |
-attachment=>"bib-$biblionumber.$format"); |
104 |
} |
98 |
} |
105 |
} |
99 |
- |
|
|