We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 3801b50 commit d254e70Copy full SHA for d254e70
postinstall.pl
@@ -28,10 +28,13 @@ sub module_install
28
my %uclang;
29
&read_file("$usermin::config{'usermin_dir'}/custom-lang", \%uclang);
30
if (!$uclang{'session_postfix'}) {
31
- my $url = &virtual_server::get_virtualmin_url()."/".
32
- $module_name."/usermin.cgi";
+ my %miniserv;
+ &get_miniserv_config(\%miniserv);
33
+ my $port = $miniserv{'port'};
34
$uclang{'session_postfix'} =
- "<center><a href=$url>$text{'login_forgot2'}</a></center>";
35
+ "<center><a href=/$module_name/usermin.cgi ".
36
+ "onclick='javascript:event.target.port=$port'>".
37
+ "$text{'login_forgot2'}</a></center>";
38
&write_file("$usermin::config{'usermin_dir'}/custom-lang",
39
\%uclang);
40
}
0 commit comments