From 92151cdf7bb4afd14304a2b97c6a22972f5225ad Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Fri, 15 Jun 2007 21:29:12 +0000
Subject: [PATCH] documentation for new macro

---
 lib/WebGUI/Asset/Wobject/SQLReport.pm    |  2 +-
 lib/WebGUI/Help/Macro_NewMail.pm         | 20 ++++++++++++++++
 lib/WebGUI/i18n/English/Macro_NewMail.pm | 29 ++++++++++++++++++++++++
 3 files changed, 50 insertions(+), 1 deletion(-)
 create mode 100644 lib/WebGUI/Help/Macro_NewMail.pm
 create mode 100644 lib/WebGUI/i18n/English/Macro_NewMail.pm

diff --git a/lib/WebGUI/Asset/Wobject/SQLReport.pm b/lib/WebGUI/Asset/Wobject/SQLReport.pm
index e3a4f850e..9b9160d59 100644
--- a/lib/WebGUI/Asset/Wobject/SQLReport.pm
+++ b/lib/WebGUI/Asset/Wobject/SQLReport.pm
@@ -33,7 +33,7 @@ sub definition {
 	my $i18n = WebGUI::International->new($session,"Asset_SQLReport");
 	push(@{$definition}, {
 		assetName=>$i18n->get('assetName'),
-		uiLevel => 9,
+		uiLevel => 5,
 		icon=>'sqlReport.gif',
 		tableName=>'SQLReport',
 		className=>'WebGUI::Asset::Wobject::SQLReport',
diff --git a/lib/WebGUI/Help/Macro_NewMail.pm b/lib/WebGUI/Help/Macro_NewMail.pm
new file mode 100644
index 000000000..3d6435570
--- /dev/null
+++ b/lib/WebGUI/Help/Macro_NewMail.pm
@@ -0,0 +1,20 @@
+package WebGUI::Help::Macro_NewMail;
+
+our $HELP = {
+
+    'new mail' => {
+        title => 'new mail title',
+        body => 'new mail body',
+        fields => [
+        ],
+        related => [
+            {
+                tag => 'macros using',
+                namespace => 'Macros'
+            },
+        ]
+    },
+
+};
+
+1;
diff --git a/lib/WebGUI/i18n/English/Macro_NewMail.pm b/lib/WebGUI/i18n/English/Macro_NewMail.pm
new file mode 100644
index 000000000..5e25f44e5
--- /dev/null
+++ b/lib/WebGUI/i18n/English/Macro_NewMail.pm
@@ -0,0 +1,29 @@
+package WebGUI::i18n::English::Macro_NewMail;
+
+our $I18N = {
+
+    'macroName' => {
+        message => q|New Mail|,
+        lastUpdated => 1181942771,
+    },
+
+    'new mail title' => {
+        message => q|New Mail Macro|,
+        lastUpdated => 1181942777,
+    },
+
+    'new mail body' => {
+        message => q|
+<p><b>&#94;NewMail</b>();<br />
+<b>&#94;NewMail</b>(<i>CSS Class</i>);<br />
+This macro will display whether the current user has unread messages in their Inbox.  If there
+are no unread messages, it will return nothing.
+</p>
+<p>This Macro may be nested inside other Macros.</p>
+        |,
+        lastUpdated => 1181942878,
+    },
+
+};
+
+1;