You are viewing a plain text version of this content. The canonical link for it is here.
Posted to docs-cvs@perl.apache.org by mo...@apache.org on 2002/04/06 16:42:27 UTC
cvs commit: modperl-docs/src/search search.tt swish.cgi
moseley 02/04/06 06:42:27
Modified: src style.css
src/search search.tt swish.cgi
Log:
Adjusted style sheet and search templates per allan's request.
More details on modperl-docs list.
Revision Changes Path
1.42 +31 -7 modperl-docs/src/style.css
Index: style.css
===================================================================
RCS file: /home/cvs/modperl-docs/src/style.css,v
retrieving revision 1.41
retrieving revision 1.42
diff -u -r1.41 -r1.42
--- style.css 3 Apr 2002 05:14:51 -0000 1.41
+++ style.css 6 Apr 2002 14:42:26 -0000 1.42
@@ -157,16 +157,19 @@
}
div.headline {
- background-color: #525a73;
+ background-color: #525a76;
font-family: verdana, arial, helvetica, sans-serif;
font-weight: bold;
color: #ffffff;
font-size: 1.2em;
padding: 3px;
+ margin-right: 0px;
}
/* Search Results */
-div.searchform { font-size: 0.8em; }
+div.searchform {
+ font-size: 1.0em;
+}
td.searchheader {
background-color: #525a73;
@@ -177,10 +180,10 @@
}
td.searchtimes {
- background-color: #525a73;
+ background-color: #525a76;
font-family: verdana, arial, helvetica, sans-serif;
color: #ffffff;
- font-size: 0.8em;
+ font-size: 0.7em;
/* font-size: 0.6em; */
}
@@ -191,18 +194,39 @@
font-size: 0.8em;
}
+td.limits {
+ font-family: helvetica, arial, verdana, sans-serif;
+ color: #000000;
+ font-size: 1.0em;
+}
+
+span.base-result {
+ font-family: helvetica, arial, verdana, sans-serif;
+ color: #000000;
+ font-size: 1.0em;
+}
+
+span.searchrank {
+ font-family: helvetica, arial, verdana, sans-serif;
+ color: #000000;
+ font-size: 0.9em;
+}
+
div.searchsummary {
- font-size: 0.85em;
-/* font-size: 0.8em; */
+/* font-size: 0.85em; */
+ font-size: 0.8em;
}
div.searchprops {
+ margin-top: 0.4em;
font-size: 0.80em;
color: green;
/* font-size: 0.6em; */
}
-span.searchhighlight { background-color: #ffff99; }
+span.searchhighlight {
+ background-color: #ffff99;
+}
code { font-family: courier new, courier, monospace; }
1.8 +14 -14 modperl-docs/src/search/search.tt
Index: search.tt
===================================================================
RCS file: /home/cvs/modperl-docs/src/search/search.tt,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- search.tt 25 Mar 2002 03:35:51 -0000 1.7
+++ search.tt 6 Apr 2002 14:42:26 -0000 1.8
@@ -66,11 +66,11 @@
[% CGI.start_form( '-action' => CGI.script_name) %]
[% CGI.textfield( {
name => 'query',
- size => 40,
+ size => 25,
maxlength => 200,
} ) %]
- [% CGI.submit('submit','Search!') %]<br>
+ [% CGI.submit('submit','Search!') %]<br><br>
[% search.get_meta_name_limits %]
[% search.get_sort_select_list %]
[% search.get_index_select_list %]
@@ -85,21 +85,21 @@
[% BLOCK nav_bar %]
[% search.stopwords_removed %]
- <table cellpadding=0 cellspacing=0 border=0 width="100%">
+ <table cellpadding="0" cellspacing="0" border="0" width="100%">
<tr>
<td class="searchheader">
Results for <b>[% search.query_simple | html %]</b>
[% search.navigation('from') %] to [% search.navigation('to') %] of [% search.navigation('hits') %] results.
</td>
- <td align=right class="searchtimes">
- Search time: [% search.navigation('search_time') %]
+ <td align="right" class="searchtimes">
+ [% search.navigation('search_time') %]
</td>
</tr>
[% IF search.navigation('pages') %]
<tr>
- <td colspan=2 class="searchnav">
+ <td colspan="2" class="searchnav">
Page:
[% search.navigation('pages') %]
@@ -126,12 +126,12 @@
[% FOREACH item = search.results %]
<dl>
<dt>
- [% item.swishreccount %]
- <a href="[% item.swishdocpath_href %]">
- [% ( item.swishtitle || item.swishdocpath ) %]
- </a>
-
- <small>-- rank: <b>[% item.swishrank %]</b></small>
+ <span class="base-result">
+ [% item.swishreccount %]
+ <a href="[% item.swishdocpath_href %]">
+ [% ( item.swishtitle || item.swishdocpath ) %]
+ </a>
+ </span>
</dt>
<dd>
@@ -141,9 +141,9 @@
</dd>
<dd>
<div class="searchprops">
+ Rank: [% item.swishrank %]<br>
[% item.swishdocpath %]<br>
- [% item.swishdocsize %] bytes
- [% item.swishlastmodified %]
+ [% item.swishdocsize %] bytes / [% item.swishlastmodified %]
</div>
</dd>
1.7 +5 -5 modperl-docs/src/search/swish.cgi
Index: swish.cgi
===================================================================
RCS file: /home/cvs/modperl-docs/src/search/swish.cgi,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- swish.cgi 24 Mar 2002 17:06:38 -0000 1.6
+++ swish.cgi 6 Apr 2002 14:42:26 -0000 1.7
@@ -18,7 +18,7 @@
#
# To display documentation for this program type "perldoc swish.cgi"
#
-# swish.cgi $Revision: 1.6 $ Copyright (C) 2001 Bill Moseley swishscript@hank.org
+# swish.cgi $Revision: 1.7 $ Copyright (C) 2001 Bill Moseley swishscript@hank.org
# Example CGI program for searching with SWISH-E
#
# This example program will only run under an OS that supports fork().
@@ -37,7 +37,7 @@
#
# The above lines must remain at the top of this program
#
-# $Id: swish.cgi,v 1.6 2002/03/24 17:06:38 stas Exp $
+# $Id: swish.cgi,v 1.7 2002/04/06 14:42:26 moseley Exp $
#
####################################################################################
@@ -297,8 +297,8 @@
occurrences => 6, # Limit number of occurrences of highlighted words
#highlight_on => '<b>', # HTML highlighting codes
#highlight_off => '</b>',
- highlight_on => '<font style="background:#FFFF99">',
- highlight_off => '</font>',
+ highlight_on => '<span class="searchhighlight">',
+ highlight_off => '</span>',
meta_to_prop_map => { # this maps search metatags to display properties
swishdefault => [ qw/swishtitle swishdescription/ ],
swishtitle => [ qw/swishtitle/ ],
@@ -2516,7 +2516,7 @@
=head1 LICENSE
-swish.cgi $Revision: 1.6 $ Copyright (C) 2001 Bill Moseley search@hank.org
+swish.cgi $Revision: 1.7 $ Copyright (C) 2001 Bill Moseley search@hank.org
Example CGI program for searching with SWISH-E
---------------------------------------------------------------------
To unsubscribe, e-mail: docs-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: docs-cvs-help@perl.apache.org