X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=cgi%2Fsearch.cgi;h=275be8ab3f232e87b162135b6f9d515036eccd20;hb=refs%2Fheads%2Fdebian;hp=b1f5e09f84724a8b3e38377db960073d275b7ce9;hpb=f492418a6fe1653c67d9f26428da65f1b584cee6;p=debbugs.git diff --git a/cgi/search.cgi b/cgi/search.cgi index b1f5e09..275be8a 100755 --- a/cgi/search.cgi +++ b/cgi/search.cgi @@ -3,11 +3,11 @@ use warnings; use strict; -# Hack to work on merkel where suexec is in place +# Hack to work on bugs-search.debian.org BEGIN{ - if ($ENV{HTTP_HOST} eq 'merkel.debian.org') { - unshift @INC, qw(/home/don/perl/usr/share/perl5 /home/don/perl/usr/lib/perl5 /home/don/source); - $ENV{DEBBUGS_CONFIG_FILE}="/home/don/config_internal"; + if ($ENV{HTTP_HOST} eq 'bugs-search.debian.org') { + unshift @INC, qw(/srv/bugs.debian.org/source/debian/); + $ENV{DEBBUGS_CONFIG_FILE}="/srv/bugs.debian.org/etc/config"; } } @@ -198,11 +198,11 @@ for my $attribute (@{$cgi_var{attribute}}) { } print qq(\n); $$attribute{value}='' if not defined $$attribute{value}; - print qq(
\n); + print qq(
\n); $attr_num++; } -print qq(
); +print qq(
); # order @@ -269,9 +269,9 @@ if (defined $nres) { my $showseverity; $showseverity = "Severity: $attr{severity};\n"; print <#${bugnum}: $attr{'@title'} @{[htmlize_packagelinks($attr{package})]}
-$showseverity
-Sent by: @{[encode_entities($attr{'@author'})]} at $attr{'@cdate'}
+
  • #${bugnum}: $attr{'@title'} @{[htmlize_packagelinks($attr{package})]}
    +$showseverity
    +Sent by: @{[encode_entities($attr{'@author'})]} at $attr{'@cdate'}
    END # Deal with the snippet # make the things that match bits of the phrase bold, the rest normal.