Handle hostnames with upper-case letters

[webmin.git] / xmlrpc.cgi

diff --git a/xmlrpc.cgi b/xmlrpc.cgi
index f4652f6..8f24724 100755 (executable)
--- a/xmlrpc.cgi
+++ b/xmlrpc.cgi
@@ -17,7 +17,8 @@ if (!$ENV{'GATEWAY_INTERFACE'}) {
        $command_line = 1;
        $< == 0 || die "xmlrpc.pl must be run as root";
        }
-do './web-lib.pl';
+BEGIN { push(@INC, ".."); };
+use WebminCore;
 use POSIX;
 use Socket;
 $force_lang = $default_lang;