POD on Module

1 files changed, 46 insertions, 0 deletions

diff --git a/lib/AdminPanel/Module.pm b/lib/AdminPanel/Module.pm
index 1488e955..16c82597 100644
--- a/lib/AdminPanel/Module.pm
+++ b/lib/AdminPanel/Module.pm
@@ -93,11 +93,42 @@ has 'button' => (
 );
 
 
+#=============================================================
+
+=head2 setButton
+
+=head3 INPUT
+
+$self:   this object
+$button: yui push button to be assigned to this module
+
+=head3 DESCRIPTION
+
+This method assignes a button to this module
+
+=cut
+
+#=============================================================
 sub setButton {
     my ($self, $button) = @_;
     $self->{button} = $button;
 }
 
+#=============================================================
+
+=head2 removeButton
+
+=head3 INPUT
+
+$self: this object
+
+=head3 DESCRIPTION
+
+This method remove the assigned button from this module
+
+=cut
+
+#=============================================================
 sub removeButton {
     my($self) = @_;
 
@@ -105,6 +136,21 @@ sub removeButton {
 }
 
 # base class launcher
+#=============================================================
+
+=head2 start
+
+=head3 INPUT
+
+$self: this object
+
+=head3 DESCRIPTION
+
+This method is the base class launcher, run external modules.
+
+=cut
+
+#=============================================================
 sub start {
     my $self = shift;