rev 1281 - trunk/siesta/bin

[prev] [thread] [next] [lurker] [Date index for 2003/08/01]

From: richardc
Subject: rev 1281 - trunk/siesta/bin
Date: 12:13 on 01 Aug 2003
Author: richardc
Date: 2003-08-01 12:13:49 +0100 (Fri, 01 Aug 2003)
New Revision: 1281

Modified:
   trunk/siesta/bin/nacho
Log:
descirbe-list needs to show all the plugin queues

Modified: trunk/siesta/bin/nacho
===================================================================
--- trunk/siesta/bin/nacho	2003-08-01 08:19:20 UTC (rev 1280)
+++ trunk/siesta/bin/nacho	2003-08-01 11:13:49 UTC (rev 1281)
@@ -181,8 +181,9 @@
         print "$key = $value\n";
     }
 
-    print "plugins : ", join( ' ', map { ($_->personal)? "+".$_->name:$_->name  } $list->plugins), "\n";
-
+    for my $queue ($list->queues) {
+        print "$queue plugins: ", join( ' ', map { ($_->personal)? "+".$_->name:$_->name  } $list->plugins( $queue )), "\n";
+    }
 };
 
 =head2 modify-list I<list_id> I<key> I<value>

Generated at 13:57 on 01 Jul 2004 by mariachi 0.52