Handle hostnames with upper-case letters

[webmin.git] / password_form.cgi

diff --git a/password_form.cgi b/password_form.cgi
index 093cde3..2994c22 100755 (executable)
--- a/password_form.cgi
+++ b/password_form.cgi
@@ -2,10 +2,12 @@
 # password_form.cgi
 # Display the form that allows users to change their passwords at login time
 
+BEGIN { push(@INC, ".."); };
+use WebminCore;
+
+$pragma_no_cache = 1;
 $ENV{'MINISERV_INTERNAL'} || die "Can only be called by miniserv.pl";
-require './web-lib.pl';
 &init_config();
-require './ui-lib.pl';
 &ReadParse();
 &header(undef, undef, undef, undef, 1, 1);