Parent Directory | Revision Log | Patch
revision 41 by dpavlin, Sun Jun 1 12:13:36 2003 UTC | revision 57 by dpavlin, Sun Jan 25 16:49:50 2004 UTC | |
---|---|---|
# | Line 152 if (param('search')) { | Line 152 if (param('search')) { |
152 | $hit_fmt = x($config->{hit}) if (x($config->{hit})); | $hit_fmt = x($config->{hit}) if (x($config->{hit})); |
153 | } | } |
154 | ||
155 | sub kill_html { | |
156 | my @out; | |
157 | foreach (@_) { | |
158 | s/<[^>]+>//g; | |
159 | push @out,$_; | |
160 | } | |
161 | return @out; | |
162 | } | |
163 | ||
164 | my $sh = SWISH->connect('Fork', | my $sh = SWISH->connect('Fork', |
165 | prog => x($config->{prog}), | prog => x($config->{prog}), |
166 | indexes => x($config->{index}), | indexes => x($config->{index}), |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |