mirror of
https://github.com/SCST-project/scst.git
synced 2026-08-18 13:16:34 +00:00
- Better list trace levels.
git-svn-id: http://svn.code.sf.net/p/scst/svn/trunk@1925 d57e44dd-8a1f-0410-8b47-8ef2f437770f
This commit is contained in:
@@ -2203,10 +2203,18 @@ sub listAttributes {
|
||||
|
||||
if ($nonkey && defined($$attributes{'trace_level'})) {
|
||||
my $found = FALSE;
|
||||
print "\n\tPossible trace levels (use trace_level=\"add <level>\", none, all or default to set):\n";
|
||||
print "\n\tPossible trace levels:\n".
|
||||
"\t (use trace_level=\"add <level>\", none, all or default to set):\n";
|
||||
|
||||
my $count = 0;
|
||||
foreach my $entry (@{$$attributes{'trace_level'}->{'set'}}) {
|
||||
print "\t\t$entry\n";
|
||||
print "\t\t" if (!$count);
|
||||
print "$entry, ";
|
||||
$count++;
|
||||
if ($count == 5) {
|
||||
print "\n";
|
||||
$count = 0;
|
||||
}
|
||||
}
|
||||
|
||||
print "\n";
|
||||
|
||||
Reference in New Issue
Block a user