use strict;
require Exporter;
+use C4::Auth;
use C4::Context;
use C4::Output;
use CGI;
my $tagslib = &MARCgettagslib($dbh,1);
my $record =MARCgetbiblio($dbh,$bibid);
-warn $record->as_formatted();
+#warn $record->as_formatted();
# open template
-my $template = gettemplate("catalogue/MARCdetail.tmpl",0);
+my ($template, $loggedinuser, $cookie)
+ = get_template_and_user({template_name => "catalogue/MARCdetail.tmpl",
+ query => $query,
+ type => "intranet",
+ authnotrequired => 0,
+ flagsrequired => {catalogue => 1},
+ debug => 1,
+ });
+
# fill arrays
my @loop_data =();
my $tag;
item_header_loop => \@header_value_loop,
biblionumber => $biblionumber,
bibid => $bibid);
-print "Content-Type: text/html\n\n", $template->output;
+print $query->header(-cookie => $cookie),$template->output;