Fix to correctly handle save and save and next buttons

This commit is contained in:
Ilia Ross
2024-04-17 15:33:47 +03:00
parent 6f1b0db855
commit e2cf926097

View File

@@ -428,21 +428,22 @@ return $rv;
sub link_config_cparams
{
my ($m, $in, $keep) = @_;
my $url = "/$m";
my $url = "/$m/";
my @w;
if ($in->{'_cscript'}) {
if ($keep) {
$url .= "/".$in->{'_cscript'};
push(@w, "_cscript=".&urlize(&un_urlize($in->{'_cscript'})));
}
else {
push(@w, "_cscript=".&urlize($in->{'_cscript'}));
$url .= $in->{'_cscript'};
}
}
foreach my $k (keys %$in) {
if ($k =~ /^_cparam_(.*)$/) {
$n = $1;
foreach my $v (split(/\0/, $in{$k})) {
push(@w, &urlize($keep ? $k : $n)."=".&urlize($v));
push(@w, &urlize($keep ? &un_urlize($k) :
&un_urlize($n))."=".&urlize(&un_urlize($v)));
}
}
}