michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-02-03 14:13:29 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Try again to kill a pptp connection

Browse Source
This commit is contained in:
Jamie Cameron
2009-07-24 11:16:04 -07:00
parent a02ca65ff6
commit c28a16d9d7
1 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
pptp-client/disc.cgi
View File

@@ -9,8 +9,14 @@ require './pptp-client-lib.pl';
($conn) = grep { $_->[0] eq $in{'tunnel'} } @conns;
$conn || &error($text{'disc_egone'});
&kill_logged('HUP', $conn->[1]) || &error($text{'disc_ekill'});
&webmin_log("disc", undef, $in{'tunnel'});
sleep(3);
@conns = &list_connected();
($conn) = grep { $_->[0] eq $in{'tunnel'} } @conns;
if ($conn) {
# Not dead .. kill harder
&kill_logged('KILL', $conn->[1]);
}
&webmin_log("disc", undef, $in{'tunnel'});
&redirect("");