From 2d90644e1c378eed406d8fa8bd20af1a5152a95d Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Thu, 2 Feb 2006 23:10:31 +0000
Subject: [PATCH] Update Redirect navigation to show how it really works.
 Localize self-referential redirect URL message.

Beginning of EMS master documentation.
---
 lib/WebGUI/Asset/Redirect.pm                    |  4 ++--
 .../i18n/English/Asset_EventManagementSystem.pm | 17 +++++++++++++++--
 lib/WebGUI/i18n/English/Asset_Redirect.pm       |  9 +++++++--
 3 files changed, 24 insertions(+), 6 deletions(-)

diff --git a/lib/WebGUI/Asset/Redirect.pm b/lib/WebGUI/Asset/Redirect.pm
index 9779ebe31..6ea49539c 100644
--- a/lib/WebGUI/Asset/Redirect.pm
+++ b/lib/WebGUI/Asset/Redirect.pm
@@ -119,8 +119,8 @@ A web executable method that redirects the user to the specified page, or displa
 sub www_view {
         my $self = shift;
         return $self->session->privilege->noAccess() unless $self->canView;
+	my $i18n = WebGUI::International->new($self->session, "Asset_Redirect");
         if ($self->session->var->isAdminOn() && $self->canEdit) {
-                my $i18n = WebGUI::International->new($self->session, "Asset_Redirect");
                 return $self->getAdminConsole->render($i18n->get("what do you want to do with this redirect").'
                         <ul>
                         <li><a href="'.$self->get("redirectUrl").'">'.$i18n->get("go to the redirect url").'</a></li>
@@ -131,7 +131,7 @@ sub www_view {
         my $url = $self->get("redirectUrl");
         WebGUI::Macro::process(\$url);
         $self->session->http->setRedirect($url) unless $self->get("redirectUrl") eq $self->get("url");
-        return "Redirect is self-referential";
+        return $i18n->get('self_referential');
 }
 
 1;
diff --git a/lib/WebGUI/i18n/English/Asset_EventManagementSystem.pm b/lib/WebGUI/i18n/English/Asset_EventManagementSystem.pm
index 17889421b..de62fa733 100644
--- a/lib/WebGUI/i18n/English/Asset_EventManagementSystem.pm
+++ b/lib/WebGUI/i18n/English/Asset_EventManagementSystem.pm
@@ -1,9 +1,22 @@
 package WebGUI::i18n::English::Asset_EventManagementSystem;
 
 our $I18N = { ##hashref of hashes
+	'add/edit help title' => { 
+		message => q|Add/Edit Event Management System|,
+		lastUpdated => 1131394070,
+		context => q|Title for Add/Edit Event Managment System Help|
+	},
+
+	'add/edit help body' => { 
+		message => q|<p>The Event Management System provides registration and payment for events inside WebGUI.  You can assign two groups who are allowed to do event management, one to add events to the manager, and another to approve them.  You will also be able to setup several templates for the display of the list of events and the event checkout form.</p>
+		<p>Each event for sale is a Product from the Commerce System.</p>|,
+		lastUpdated => 1131394070,
+		context => q|Body for Add/Edit Event Managment System Help|
+	},
+
 	'display template' => { 
 		message => q|Display Template|,
-		lastUpdated => 1131394070, #seconds from the epoch
+		lastUpdated => 1131394070,
 		context => q|Field label for template selector|
 	},
 
@@ -15,7 +28,7 @@ our $I18N = { ##hashref of hashes
 
 	'add/edit event template' => { 
 		message => q|Event Template|,
-		lastUpdated => 1131394070, #seconds from the epoch
+		lastUpdated => 1131394070,
 		context => q|Field label for event template selector|
 	},
 
diff --git a/lib/WebGUI/i18n/English/Asset_Redirect.pm b/lib/WebGUI/i18n/English/Asset_Redirect.pm
index 43bbd4ba1..a672649df 100644
--- a/lib/WebGUI/i18n/English/Asset_Redirect.pm
+++ b/lib/WebGUI/i18n/English/Asset_Redirect.pm
@@ -35,8 +35,8 @@ our $I18N = {
 
 	'redirect add/edit body' => {
 		message => q|
-<P>The Page Redirect Asset causes the user's browser to be redirected to another page. It does this if it is viewed standalone, as part of a Page Asset, or proxied via a macro.</P>
-<P><b>NOTE:</b> The redirection will be disabled while in admin mode in order to allow editing the properties of the page.</P>
+<P>The Page Redirect Asset causes the user's browser to be redirected to another page. This will happen automatically if it is viewed standalone.  If the Asset is viewed as part a Page Asset, or proxied via a macro, then nothing will happen.</P>
+<P><b>NOTE:</b> The redirection will be disabled while in admin mode in order to allow editing the properties of the Asset.</P>
 
 |,
         	lastUpdated => 1130876050,
@@ -48,6 +48,11 @@ our $I18N = {
                 lastUpdated => 1119574089,
         },
 
+        'self_referential' => {
+                message => q|Redirect is self-referential|,
+                lastUpdated => 1119574089,
+        },
+
         'assetName' => {
                 message => q|Redirect|,
                 context => q|label for Asset Manager, getName|,