Changeset 9dee329 for client

Timestamp:

Aug 16, 2010, 12:54:37 PM (14 years ago)

Author:

Kyle Brogle <broglek@…>

Branches:

master, debian, mac, no-cups

Children:

618236b, 600e713

Parents:

7cdd65d

git-author:

Kyle Brogle <broglek@…> (08/16/10 12:54:37)

git-committer:

Kyle Brogle <broglek@…> (08/16/10 12:54:37)

Message:

[Trac # 17] gbq now has fixed width columns to prevent formatting inconsistencies.

File:

• client/bin/gbq (modified) (2 diffs)

client/bin/gbq

@@ -43 +43 @@
 }
 print "Queue listing for queue '$queue' on '$host'\n\n";
-print "Job ID\t\tOwner\t\tTitle\n";
-print "-----------------------------------------------------------------\n";
-
+printf ("%-8s%-15s%s\n","Job","Owner","Title");
+print "-"x70 . "\n";
 my @jobs = $printer->getJobs(0, 0);
 my ($job_ref, $jobid);
@@ -56 +55 @@
         my $title = $job_ref->{'title'};
 
-        print "$id\t\t$user\t\t$title\n";
+        printf ("%-8s%-15s%s\n","$id",substr("$user",0,15),substr("$title",0,47));
 }