dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

New post management in handler (#733)

Browse Source
This commit is contained in:
Xavier Guimard 2016-02-13 18:21:03 +00:00
parent 365701ee49
commit 225521a416
2 changed files with 8 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lemonldap-ng-handler/lib/Lemonldap/NG/Handler/API/ApacheMP2.pm
View File

@ -238,8 +238,8 @@ sub addToHtmlHead {
$f->ctx($body);
}
else {
$body =~ s/(<\/head>)/$data$1/i
or $body =~ s/(<body>)/$1$data/i;
$body =~ s/(<\/head>)/$data$1/si
or $body =~ s/(<body>)/$1$data/si;
$f->print($body);
}
return OK;

19
lemonldap-ng-handler/lib/Lemonldap/NG/Handler/Reload.pm
View File

@ -278,24 +278,17 @@ sub postUrlInit {
"Compiling POST data for $url", 'debug' );
# Where to POST
my ( $postUrl, $jqueryUrl, $formSelector, $buttonSelector ) =
split( /\|/, $d->{postUrl} );
$postUrl ||= $url;
$d->{target} ||= $url;
my $sub;
foreach my $input ( keys %{ $d->{expr} } ) {
my $val = $class->substitute( $d->{expr}->{$input} );
$sub .= "'$input' => $val,";
$d->{vars} ||= [];
foreach my $input ( @{ delete $d->{vars} } ) {
$sub .= "'$input->[0]' => $input->[1],";
}
$tsv->{inputPostData}->{$vhost}->{$postUrl} =
$tsv->{inputPostData}->{$vhost}->{ delete $d->{target} } =
$tsv->{outputPostData}->{$vhost}->{$url} =
$tsv->{jail}->jail_reval("sub{$sub}");
$tsv->{postFormParams}->{$vhost}->{$url} = {
jqueryUrl => $jqueryUrl,
formSelector => $formSelector,
buttonSelector => $buttonSelector
};
$tsv->{postFormParams}->{$vhost}->{$url} = $d;
}
}
return 1;