From 9b082133bb76416c9413a03e1f2a74728b348b12 Mon Sep 17 00:00:00 2001
From: Roy Johnson <roy.l.johnson@gmail.com>
Date: Mon, 13 Jun 2005 02:59:36 +0000
Subject: [PATCH] fix - [ 1218475 ] cannot set "who to view" in style templates

---
 lib/WebGUI/Form.pm | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/Form.pm b/lib/WebGUI/Form.pm
index d66539bf0..797382559 100644
--- a/lib/WebGUI/Form.pm
+++ b/lib/WebGUI/Form.pm
@@ -1671,9 +1671,20 @@ sub template {
 	my $params = shift;
         my $templateId = $params->{value} || $params->{defaultValue};
 	my $name = $params->{name} || "templateId";
+	my $userId = $session{user}{userId};
+	my $templateList = WebGUI::Asset::Template->getList($params->{namespace});
+
+	#Remove entries from template list that the user does not have permission to view.
+        for my $assetId ( keys %{$templateList} ) {
+       	  my $asset = WebGUI::Asset->new($assetId);
+
+          if (!$asset->canView($userId)) {
+            delete $templateList->{$assetId}; 
+	  }
+	}
         return selectList({
                 name=>$name,
-                options=>WebGUI::Asset::Template->getList($params->{namespace}),
+                options=>$templateList,
                 value=>[$templateId],
 		extras=>$params->{extras}
                 });