From 0e8c42cac2632968a04e84ab107c2ba75790f676 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Wed, 13 Jul 2005 23:50:37 +0000
Subject: [PATCH] hover help for Operation/FormHelpers

---
 lib/WebGUI/Operation/FormHelpers.pm |  2 ++
 lib/WebGUI/i18n/English/WebGUI.pm   | 10 ++++++++++
 2 files changed, 12 insertions(+)

diff --git a/lib/WebGUI/Operation/FormHelpers.pm b/lib/WebGUI/Operation/FormHelpers.pm
index 10954db7b..27898e867 100644
--- a/lib/WebGUI/Operation/FormHelpers.pm
+++ b/lib/WebGUI/Operation/FormHelpers.pm
@@ -51,11 +51,13 @@ sub www_richEditPageTree {
 	$f->text(
 		-name=>"url",
 		-label=>WebGUI::International::get(104),
+		-hoverHelp=>WebGUI::International::get('104 description'),
 		-extras=>'id="url"'
 		);
 	$f->selectList(
 		-name=>"target",
 		-label=>WebGUI::International::get('target'),
+		-hoverHelp=>WebGUI::International::get('target description'),
 		-options=>{"_self"=>WebGUI::International::get('link in same window'),
 		           "_blank"=>WebGUI::International::get('link in new window')},
 		-extras=>'id="target"'
diff --git a/lib/WebGUI/i18n/English/WebGUI.pm b/lib/WebGUI/i18n/English/WebGUI.pm
index e3c607e2b..1ff791fd5 100644
--- a/lib/WebGUI/i18n/English/WebGUI.pm
+++ b/lib/WebGUI/i18n/English/WebGUI.pm
@@ -2156,12 +2156,22 @@ This group could then be named "Employees in HMO 1", and would allow you to rest
 		context => q|asset property|
 	},
 
+	'104 description' => {
+		message => q|Enter a URL for your link|,
+		lastUpdated => 1121298520,
+	},
+
 	'target' => {
 		message => q|Target|,
 		lastUpdated => 1118936724,
 		context => q|form helper, rich edit page tree|
 	},
 
+	'target description' => {
+		message => q|Choose whether the link, when clicked, will open in the same window or open in another one|,
+		lastUpdated => 1121298550,
+	},
+
 	'done' => {
 		message => q|Done|,
 		lastUpdated => 1118936724,