remove trailing spaces for dumb users
This commit is contained in:
parent
9f6887dea7
commit
4585c04b42
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/www/; revision=12955
1 changed files with 6 additions and 2 deletions
|
@ -33,7 +33,7 @@
|
|||
# BSDI Id: bsdi-man,v 1.2 1995/01/11 02:30:01 polk Exp
|
||||
# Dual CGI/Plexus mode and new interface by sanders@bsdi.com 9/22/1995
|
||||
#
|
||||
# $Id: man.cgi,v 1.67 2002-05-04 15:56:24 wosch Exp $
|
||||
# $Id: man.cgi,v 1.68 2002-05-04 15:58:29 wosch Exp $
|
||||
|
||||
#use Data::Dumper;
|
||||
#use Carp;
|
||||
|
@ -350,6 +350,10 @@ sub do_man {
|
|||
return &man($1, $2);
|
||||
}
|
||||
|
||||
# remove trailing spaces for dumb users
|
||||
$form{'query'} =~ s/\s+$//;
|
||||
$form{'query'} =~ s/^\s+//;
|
||||
|
||||
$name = $query = $form{'query'};
|
||||
$section = $form{'sektion'};
|
||||
$apropos = $form{'apropos'};
|
||||
|
@ -926,7 +930,7 @@ ETX
|
|||
}
|
||||
|
||||
sub copyright {
|
||||
$id = '$Id: man.cgi,v 1.67 2002-05-04 15:56:24 wosch Exp $';
|
||||
$id = '$Id: man.cgi,v 1.68 2002-05-04 15:58:29 wosch Exp $';
|
||||
|
||||
return qq{\
|
||||
<PRE>
|
||||
|
|
Loading…
Reference in a new issue