my $pkgreport_cgi_handler = sub {
# I do not understand why this is necessary.
$ENV{DEBBUGS_CONFIG_FILE} = "$config{config_dir}/debbugs_config";
- my $content = qx(perl -I. -I./cgi -T cgi/pkgreport.cgi);
+ # We cd here because pkgreport uses require ./common.pl
+ my $content = qx(cd cgi; perl -I.. -T pkgreport.cgi);
# Strip off the Content-Type: stuff
$content =~ s/^\s*Content-Type:[^\n]+\n*//si;
print $content;