From 1dda7865788e794df060f948207547318e266650 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Thu, 25 Aug 2005 21:24:29 +0000
Subject: [PATCH] hrmmm

---
 lib/WebGUI.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lib/WebGUI.pm b/lib/WebGUI.pm
index 886fdee6b..86d7f3670 100644
--- a/lib/WebGUI.pm
+++ b/lib/WebGUI.pm
@@ -94,6 +94,10 @@ sub page {
 			my $method = "view";
 			if (exists $session{form}{func}) {
 				$method = $session{form}{func};
+				unless ($method =~ /^[A-Za-z]+$/) {
+					WebGUI::ErrorHandler::security("tried to call a non-existent method $method on $assetUrl");
+					$method = "view";
+				}
 			}
 			$method = "www_".$method;
 			$output = eval{$asset->$method()};