diff --git a/lib/WebGUI/Cache/FileCache.pm b/lib/WebGUI/Cache/FileCache.pm index 1c8e3f1f7..0ce7a2a35 100644 --- a/lib/WebGUI/Cache/FileCache.pm +++ b/lib/WebGUI/Cache/FileCache.pm @@ -137,7 +137,7 @@ sub getFolder { #------------------------------------------------------------------- -=head2 getNamepsaceRoot ( ) +=head2 getNamespaceRoot ( ) Figures out what the cache root for this namespace should be. A class method. diff --git a/lib/WebGUI/Content/SiteIndex.pm b/lib/WebGUI/Content/SiteIndex.pm index 5e5ff3ce4..de77fd145 100644 --- a/lib/WebGUI/Content/SiteIndex.pm +++ b/lib/WebGUI/Content/SiteIndex.pm @@ -88,6 +88,17 @@ sub handler { } #------------------------------------------------------------------- + +=head2 formatXML ( content ) + +Escape XML entities, &, <, >, ' and ". + +=head3 content + +The content that will have XML entities escaped. + +=cut + sub formatXML { my $content = shift; $content =~ s/&/&/g; diff --git a/lib/WebGUI/Form/Captcha.pm b/lib/WebGUI/Form/Captcha.pm index 5147b0788..ebfc4a855 100644 --- a/lib/WebGUI/Form/Captcha.pm +++ b/lib/WebGUI/Form/Captcha.pm @@ -182,6 +182,12 @@ sub toHtml { return $self->SUPER::toHtml.'

captcha

'; } +=head2 getErrorMessage ( ) + +Returns an internationalized error message based on which kind of captcha is being used. + +=cut + sub getErrorMessage { my $self = shift; my $session = $self->session;