evil hack to support full text search in ports/<category>/<port>/pkg-descr

This commit is contained in:
Wolfram Schneider 2000-11-05 19:04:36 +00:00
parent cedb2f22f4
commit c71248d604
Notes: svn2git 2020-12-08 03:00:23 +00:00
svn path=/www/; revision=8291

View file

@ -24,7 +24,7 @@
# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
# SUCH DAMAGE.
#
# $FreeBSD: www/en/cgi/ports.cgi,v 1.45 2000/04/23 09:54:35 wosch Exp $
# $FreeBSD: www/en/cgi/ports.cgi,v 1.46 2000/09/03 16:30:26 wosch Exp $
#
# ports.cgi - search engine for FreeBSD ports
# o search for a port by name or description
@ -464,10 +464,11 @@ Search for:
'all', 'All',
'maintainer', 'Maintainer',
'text', 'Description',
'pkgdescr', 'Long Description',
'requires', 'Requires',
);
foreach ('all', 'name', 'text', 'maintainer', 'requires') {
foreach ('all', 'name', 'text', 'pkgdescr', 'maintainer', 'requires') {
print "<OPTION" . (($_ eq $stype) ? ' SELECTED ' : ' ') .
qq{VALUE="$_">} . ($d{$_} ? $d{$_} : $_) . qq{</OPTION>\n};
}
@ -536,7 +537,7 @@ sub footer {
<img ALIGN="RIGHT" src="/gifs/powerlogo.gif">
&copy; 1996-2000 by Wolfram Schneider. All rights reserved.<br>
};
#print q{$FreeBSD: www/en/cgi/ports.cgi,v 1.45 2000/04/23 09:54:35 wosch Exp $} . "<br>\n";
#print q{$FreeBSD: www/en/cgi/ports.cgi,v 1.46 2000/09/03 16:30:26 wosch Exp $} . "<br>\n";
print qq{Please direct questions about this service to
<I><A HREF="$mailtoURL">$mailto</A></I><br>\n};
print qq{General questions about FreeBSD ports should be sent to } .
@ -642,6 +643,15 @@ if ($path_info eq "/source") {
&exit;
}
# Full text search in ports/<category>/port>/pkg-descr
if ($stype eq 'pkgdescr') {
local($url) =
'http://www.FreeBSD.org/cgi/search.cgi?source=pkgdescr&max=25';
print "Location: $url&words=$query\n";
print "Content-type: text/plain\n\n";
&exit;
}
&header;
if ($path_info eq "/faq.html") {
&faq;