[siesta-commit] siesta/lib/Siesta List.pm,1.35,1.36

[prev] [thread] [next] [lurker] [Date index for 2002/09/11]

From: muttley
Subject: [siesta-commit] siesta/lib/Siesta List.pm,1.35,1.36
Date: 12:12 on 11 Sep 2002
Update of /cvsroot/siesta/siesta/lib/Siesta
In directory usw-pr-cvs1:/tmp/cvs-serv13021/lib/Siesta

Modified Files:
	List.pm 
Log Message:
Added plugin order functionality.


Index: List.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/List.pm,v
retrieving revision 1.35
retrieving revision 1.36
diff -u -d -r1.35 -r1.36
--- List.pm	10 Sep 2002 19:08:12 -0000	1.35
+++ List.pm	11 Sep 2002 11:12:30 -0000	1.36
@@ -139,7 +139,7 @@
     return Siesta->storage->remove_member_from_list( $self->id, $address );
 }
 
-=head2 members()
+=head2 ->members()
 
 Returns a list of all the members in the list (as User objects)
 
@@ -156,7 +156,7 @@
       Siesta->storage->list_members( $self->id );
 }
 
-=head2 plugins()
+=head2 ->plugins()
 
 Returns a list of all the plugins for a list.
 
@@ -168,6 +168,34 @@
     # you could change this, so it returned the Plugin objects,
     # this would make it consistent with members()
     Siesta->storage->list_plugins( $self->id );
+}
+
+=head2 ->add_plugin($plugin, [ $position ])
+
+Add a plugin to the end of the processing queue for this 
+list. By supplying a position the plugin will be inserted there.
+
+=cut 
+
+sub add_plugin
+{
+	my $self = shift;
+
+	return Siesta->storage->add_plugin_to_list($self, @_);
+
+}
+
+=head2 ->set_plugins (@plugins)
+
+Set the plugin processing queue for this list.
+
+=cut
+
+sub set_plugins {
+
+	my $self = shift;
+	
+	return Siesta->storage->set_plugins($self, @_);
 }
 
 1;



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