Add POD and fix typos to get POD coverage up
This commit is contained in:
parent
c2e38ac416
commit
a3a073296c
3 changed files with 18 additions and 1 deletions
|
|
@ -137,7 +137,7 @@ sub getFolder {
|
|||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
=head2 getNamepsaceRoot ( )
|
||||
=head2 getNamespaceRoot ( )
|
||||
|
||||
Figures out what the cache root for this namespace should be. A class method.
|
||||
|
||||
|
|
|
|||
|
|
@ -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;
|
||||
|
|
|
|||
|
|
@ -182,6 +182,12 @@ sub toHtml {
|
|||
return $self->SUPER::toHtml.'<p style="display:inline;vertical-align:middle;"><img src="'.$storage->getUrl($filename).'" style="border-style:none;vertical-align:middle;" alt="captcha" /></p>';
|
||||
}
|
||||
|
||||
=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;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue