Handle hostnames with upper-case letters

[webmin.git] / config_save.cgi

diff --git a/config_save.cgi b/config_save.cgi
index 9f69ad3..68048e1 100755 (executable)
--- a/config_save.cgi
+++ b/config_save.cgi
@@ -24,9 +24,6 @@ if (-r "$mdir/config_info.pl") {
        &foreign_require($m, "config_info.pl");
        local $fn = "${m}::config_form";
        if (defined(&$fn)) {
-               local $pkg = $m;
-               $pkg =~ s/[^A-Za-z0-9]/_/g;
-               eval "\%${pkg}::in = \%in";
                $func++;
                &foreign_call($m, "config_save", \%newconfig);
                }