Handle hostnames with upper-case letters

[webmin.git] / feedback.cgi

diff --git a/feedback.cgi b/feedback.cgi
index 4fac566..72da72f 100755 (executable)
--- a/feedback.cgi
+++ b/feedback.cgi
@@ -1,9 +1,13 @@
 #!/usr/local/bin/perl
 # Send the webmin feedback form
 
-require './web-lib.pl';
+BEGIN { push(@INC, ".."); };
+use WebminCore;
+
 &init_config();
-require './ui-lib.pl';
+if (&get_product_name() eq 'usermin') {
+       &switch_to_remote_user();
+       }
 &ReadParseMime();
 &error_setup($text{'feedback_err'});
 %access = &get_module_acl();