- print $query->header(
- -type => 'application/octet-stream',
- -'Content-Transfer-Encoding' => 'binary',
- -attachment=>"shelf.$format");
- print $output;
+ print $query->header(
+ -type => 'application/octet-stream',
+ -'Content-Transfer-Encoding' => 'binary',
+ -attachment=>"shelf.$format");
+ print $output;
+
+ } else {
+ $template->param(csv_profiles => GetCsvProfilesLoop('marc'));
+ $template->param(shelfid => $shelfid);
+ output_html_with_http_headers $query, $cookie, $template->output;
+ }