Update of /cvsroot/module-build/Module-Build/lib/Module/Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31391/lib/Module/Build
Modified Files:
Authoring.pod Base.pm
Log Message:
Add the current_action() method
Index: Base.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v
retrieving revision 1.376
retrieving revision 1.377
diff -u -d -r1.376 -r1.377
--- Base.pm 10 Jan 2005 04:28:14 -0000 1.376
+++ Base.pm 22 Jan 2005 02:00:21 -0000 1.377
@@ -286,6 +286,7 @@
sub config_data { shift()->_general_notes('config_data', @_) }
sub feature { shift()->_general_notes('features', @_) }
sub runtime_params { shift->_persistent_hash_read('runtime_params', @_ ? shift : ()) }
+sub current_action { shift->{action} }
sub add_build_element {
my $self = shift;
Index: Authoring.pod
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Authoring.pod,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- Authoring.pod 4 Jan 2005 05:26:38 -0000 1.4
+++ Authoring.pod 22 Jan 2005 02:00:21 -0000 1.5
@@ -647,6 +647,10 @@
=over 4
+=item current_action()
+
+Returns the name of the currently-running action, such as "build" or "test".
+
=item add_build_element($type)
Adds a new type of entry to the build process. Accepts a single
|
