Changeset d768767 for client/bin/gbrm

Timestamp:

Jul 5, 2010, 9:04:02 PM (14 years ago)

Author:

Jessica B. Hamrick <jhamrick@…>

Branches:

master, debian, mac, no-cups, web

Children:

0d02eca

Parents:

b58aada

git-author:

Jessica B. Hamrick <jhamrick@…> (07/05/10 21:04:02)

git-committer:

Jessica B. Hamrick <jhamrick@…> (07/05/10 21:04:02)

Message:

Add 'last' keyword for gbrm

File:

• client/bin/gbrm (modified) (1 diff)

client/bin/gbrm

@@ -41 +41 @@
 if ($id eq "all") {
     foreach $id(@jobs) {
-        $printer->cancelJob($id);
+        cancel_job($id, $printer);
     }
 }
 elsif ($id eq "current") {
     $id = $jobs[0];
-    $printer->cancelJob($id);
+    cancel_job($id, $printer);
+}
+elsif ($id eq "last") {
+    $id = $jobs[-1];
+    cancel_job($id, $printer);
 }
 else {
+    cancel_job($id, $printer);
+}
+
+sub cancel_job {
+    my ($id, $printer) = @_;
+    my $job_ref = $printer->getJob($id);
+    my $title = $job_ref->{'title'};
     $printer->cancelJob($id);
+
+    print "Canceled job '$title' (id $id)\n";
 }