POD for Operation/MessageLog

fixed broken i18n tag in Macro/Product

lib/WebGUI/Macro/Product.pm

@@ -33,7 +33,7 @@ sub process {
 	
 	@param = @_;
 	
-	return WebGUI::International::get('no sku or id') unless ($_[0]);
+	return WebGUI::International::get('no sku or id','Macro_Product') unless ($_[0]);
 
 	($productId, $variantId) = WebGUI::SQL->quickArray("select productId, variantId from productVariants where sku=".quote($_[0]));
 	($productId) = WebGUI::SQL->quickArray("select productId from products where sku=".quote($_[0])) unless ($productId);

lib/WebGUI/Operation/MessageLog.pm

@@ -25,12 +25,36 @@ use WebGUI::User;
 use WebGUI::Utility;
 use WebGUI::Operation::Shared;
 
+=head1 NAME
+
+Package WebGUI::Operation::MessageLog
+
+=head1 DESCRIPTION
+
+Operations for viewing message logs and individual messages.
+
+=cut
+
 #-------------------------------------------------------------------
+
+=head2 _status ( )
+
+returns a hashref with internationalized values for message status.
+
+=cut
+
 sub _status {
    return {"notice"=>WebGUI::International::get(551),"pending"=>WebGUI::International::get(552),"completed"=>WebGUI::International::get(350)};
 }
 
 #-------------------------------------------------------------------
+
+=head2 www_viewMessageLog ( )
+
+Templated display all messages for the current user.
+
+=cut
+
 sub www_viewMessageLog {
    my (@msg, $vars);
    return WebGUI::Privilege::insufficient() unless (WebGUI::Grouping::isInGroup(2,$session{user}{userId}));
@@ -68,6 +92,13 @@ sub www_viewMessageLog {
 }
 
 #-------------------------------------------------------------------
+
+=head2 www_viewMessageLog ( )
+
+Templated display of a single message for the user.
+
+=cut
+
 sub www_viewMessageLogMessage {
    my ($data, $vars);
    return WebGUI::Privilege::insufficient() unless (WebGUI::Grouping::isInGroup(2,$session{user}{userId}));