From 9e0c0d25947257226a0ac80e3201bcc08b602c82 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Tue, 27 Mar 2007 20:43:16 +0000
Subject: [PATCH] add documentation for urlIcal template variable, and make it
 point to the URL, rather than the method

---
 lib/WebGUI/Asset/Wobject/Calendar.pm      | 6 +++++-
 lib/WebGUI/Help/Asset_Calendar.pm         | 3 +++
 lib/WebGUI/i18n/English/Asset_Calendar.pm | 5 +++++
 3 files changed, 13 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/Asset/Wobject/Calendar.pm b/lib/WebGUI/Asset/Wobject/Calendar.pm
index 1dea2b78b..cd317de78 100644
--- a/lib/WebGUI/Asset/Wobject/Calendar.pm
+++ b/lib/WebGUI/Asset/Wobject/Calendar.pm
@@ -973,7 +973,11 @@ sub view {
     $var->{"urlMonth"}      = $self->getUrl("type=month;start=".$params->{start});
     $var->{"urlSearch"}     = $self->getSearchUrl;
     $var->{"urlPrint"}      = $self->getUrl("type=".$params->{type}.";start=".$params->{start}.";print=1");
-    $var->{"urlIcal"}	    = $self->www_ical;
+    $var->{"urlIcal"}	    = $self->getUrl(
+                                    sprintf "func=ical;type=%s;start=%d
+                                        $params->{type},
+                                        $params->{start},
+                              );
 
     # Parameters
     $var->{"paramStart"}    = $params->{start};
diff --git a/lib/WebGUI/Help/Asset_Calendar.pm b/lib/WebGUI/Help/Asset_Calendar.pm
index e416da6f0..ec45aa9e0 100644
--- a/lib/WebGUI/Help/Asset_Calendar.pm
+++ b/lib/WebGUI/Help/Asset_Calendar.pm
@@ -132,6 +132,9 @@ our $HELP   = {
 		          {
 		            'name' => 'urlPrint'
 		          },
+		          {
+		            'name' => 'urlIcal'
+		          },
 		          {
 		            'name' => 'paramStart'
 		          },
diff --git a/lib/WebGUI/i18n/English/Asset_Calendar.pm b/lib/WebGUI/i18n/English/Asset_Calendar.pm
index 193a24be7..600baba5e 100755
--- a/lib/WebGUI/i18n/English/Asset_Calendar.pm
+++ b/lib/WebGUI/i18n/English/Asset_Calendar.pm
@@ -365,6 +365,11 @@ our $I18N = {
 		lastUpdated 	=> 1171043883,
 	},
 
+	'urlIcal' => {
+		message 	=> q|A URL to the iCal feed for the calendar, starting at this month.|,
+		lastUpdated 	=> 1175028512,
+	},
+
 	'paramStart' => {
 		message 	=> q|The starting date of the calendar.|,
 		lastUpdated 	=> 1171043883,