[Koha-devel] Output.pm and include files

[Owen Leonard]

I was deleting some include files from the directory of our custom template, 
and now we're getting errors about missing files.  It looks like Output.pm is 
trying to find some of these includes, but why?  What's it trying to do here:

sub startmenu($) {
  # edit the paths in here
  my ($type)=shift;
  if ($type eq 'issue') {
    open (FILE,"$path/issues-top.inc") || die "could not find : $path/issues-
top.inc";
  } elsif ($type eq 'opac') {
    open (FILE,"$path/opac-top.inc") || die "could not find : $path/opac-
top.inc";
  } elsif ($type eq 'member') {
    open (FILE,"$path/members-top.inc") || die "could not find : $path/members-
top.inc";
  } elsif ($type eq 'acquisitions'){
    open (FILE,"$path/acquisitions-top.inc") || die "could not find : 
$path/acquisition-top.inc";
  } elsif ($type eq 'report'){
    open (FILE,"$path/reports-top.inc") || die "could not find : $path/reports-
top.inc";
  } elsif ($type eq 'circulation') {
    open (FILE,"$path/circulation-top.inc") || die "could not find : 
$path/circulation-top.inc";
  } elsif ($type eq 'admin') {
    open (FILE,"$path/parameters-top.inc") || die "could not find : 
$path/parameters-top.inc";
  } else {
    open (FILE,"$path/cat-top.inc") || die "could not find : $path/cat-
top.inc";
  }
  my @string=<FILE>;
  close FILE;
  # my $count=@string;
  # $string[$count]="<BLOCKQUOTE>";
  return @string;
}

 -- Owen
----
Nelsonville Public Library
Koha 2.0.0-pre-x (CVS)