File manager - Edit - /usr/share/webmin/lpadmin/cancel_all.cgi
Back
#!/usr/bin/perl # Cancel some jobs on the selected printer require './lpadmin-lib.pl'; &ReadParse(); &error_setup($text{'cancel_err'}); %d = map { $_, 1 } split(/\0/, $in{'d'}); @jobs = &get_jobs($in{'name'}); foreach $j (@jobs) { next if (!$d{$j->{'id'}}); ($ju = $j->{'user'}) =~ s/\!.*$//; &can_edit_jobs($in{'name'}, $ju) || &error($text{'cancel_ecannot'}); &cancel_job($in{'name'}, $j->{'id'}); } &webmin_log("cancelsel", undef, $in{'name'}, { 'd' => scalar(keys %d) } ); &redirect("list_jobs.cgi?name=$in{'name'}");
| ver. 1.4 |
Github
|
.
| PHP 7.4.33 | Generation time: 0.42 |
proxy
|
phpinfo
|
Settings