Handle hostnames with upper-case letters

[webmin.git] / help.cgi

diff --git a/help.cgi b/help.cgi
index 30e447b..eaaeace 100755 (executable)
--- a/help.cgi
+++ b/help.cgi
@@ -2,10 +2,11 @@
 # help.cgi
 # Displays help HTML for some module, with substitutions
 
+BEGIN { push(@INC, ".."); };
+use WebminCore;
+
 $trust_unknown_referers = 1;
-require './web-lib.pl';
 &init_config();
-require './ui-lib.pl';
 &error_setup($text{'help_err'});
 $ENV{'PATH_INFO'} !~ /[\\\&\;\`\'\"\|\*\?\~\<\>\^\(\)\[\]\{\}\$\n\r]/ ||
        &error($text{'help_epath'});
@@ -34,8 +35,12 @@ else {
        &helperror($text{'help_eheader'});
        }
 
+# replace any explicit use of <hr> with the ui-lib function
+$uihr = &ui_hr();
+$help =~ s/<hr>/$uihr/ig;
+
 # find and replace the <footer> section
-$help =~ s/<footer>/<p><hr>/i;
+$help =~ s/<footer>/<p>/i;
 
 # find and replace <include> directives
 $help =~ s/<include\s+(\S+)>/inchelp($1)/ige;