Handle hostnames with upper-case letters

[webmin.git] / install-module.pl

diff --git a/install-module.pl b/install-module.pl
index 839493d..7ae2e51 100755 (executable)
--- a/install-module.pl
+++ b/install-module.pl
@@ -41,7 +41,7 @@ $ENV{'WEBMIN_VAR'} = $var;
 $no_acl_check++;
 chdir($root);
 $0 = "$root/install-module.pl";
-do './web-lib.pl';
+eval "use WebminCore;";
 &init_config();
 
 # Install it, using the standard function
@@ -63,6 +63,7 @@ if (ref($rv)) {
                }
        }
 else {
+       $rv =~ s/<[^>]+>//g;
        print STDERR "Install failed : $rv\n";
        }