[Jifty-commit] r3870 - in Template-Declare/lib/Template/Declare: .
jifty-commit at lists.jifty.org
jifty-commit at lists.jifty.org
Mon Aug 13 02:05:58 EDT 2007
Author: agentz
Date: Mon Aug 13 02:05:57 2007
New Revision: 3870
Modified:
Template-Declare/lib/Template/Declare/TagSet.pm
Template-Declare/lib/Template/Declare/TagSet/HTML.pm
Template-Declare/lib/Template/Declare/TagSet/XUL.pm
Log:
TD - updated the tag set POD to reflect recent changes
Modified: Template-Declare/lib/Template/Declare/TagSet.pm
==============================================================================
--- Template-Declare/lib/Template/Declare/TagSet.pm (original)
+++ Template-Declare/lib/Template/Declare/TagSet.pm Mon Aug 13 02:05:57 2007
@@ -58,11 +58,16 @@
=over
-=item C<< $list = __PACKAGE__->get_tag_list() >>
+=item C<< $obj = Template::Declare::TagSet->new({ package => 'Foo::Bar', namespace => undef }); >>
+
+Constructor created by C<Class::Accessor::Fast>,
+accepting an optional option list.
+
+=item C<< $list = $obj->get_tag_list() >>
Returns an array ref for the tag names.
-=item C<< $bool = __PACKAGE__->get_alternate_spelling($tag) >>
+=item C<< $bool = $obj->get_alternate_spelling($tag) >>
Returns whether a tag has an alternative spelling. Basically
it provides a way to work around naming conflicts, for
@@ -70,7 +75,7 @@
operator in Perl and the C<template> tag in XUL conflicts
with the C<template> sub exported by C<Template::Declare::Tags>.
-=item C<< $bool = __PACKAGE__->can_combine_empty_tags($tag) >>
+=item C<< $bool = $obj->can_combine_empty_tags($tag) >>
Specifies whether "<tag></tag>" can be combined into a single
token "<tag />".
@@ -84,6 +89,24 @@
=back
+=head1 ACCESSORS
+
+This class has two read-only accessors:
+
+=over
+
+=item C<< $obj->package() >>
+
+Retrieves the value of the C<package> option set via
+the constructor.
+
+=item C<< $obj->namespace() >>
+
+Retrieves the value of the C<namespace> option set by
+the constructor.
+
+=back
+
=head1 AUTHOR
Agent Zhang E<lt>agentzh at gmail.comE<gt>.
Modified: Template-Declare/lib/Template/Declare/TagSet/HTML.pm
==============================================================================
--- Template-Declare/lib/Template/Declare/TagSet/HTML.pm (original)
+++ Template-Declare/lib/Template/Declare/TagSet/HTML.pm Mon Aug 13 02:05:57 2007
@@ -42,7 +42,9 @@
=head1 SYNOPSIS
use Template::Declare::TagSet::HTML;
- my $tagset = 'Template::Declare::TagSet::HTML';
+ my $tagset = Template::Declare::TagSet::HTML->new(
+ { package => 'html', namespace => 'html' }
+ );
my $list = $tagset->get_tag_list();
print "@$list";
@@ -71,7 +73,11 @@
=over
-=item C<< $list = __PACKAGE__->get_tag_list() >>
+=item C<< $obj = Template::Declare::TagSet::HTML->new({ namespace => $XML_namespace, package => $Perl_package }) >>
+
+Constructor inherited from L<Template::Declare::TagSet>.
+
+=item C<< $list = $obj->get_tag_list() >>
Returns an array ref for the tag names.
@@ -79,7 +85,7 @@
C<:html2 :html3 :html4 :netscape> and C<:form>
tagsets from CGI.pm.
-=item C<< $bool = __PACKAGE__->get_alternate_spelling($tag) >>
+=item C<< $bool = $obj->get_alternate_spelling($tag) >>
Returns the alternative spelling for a given tag if any or
undef otherwise. Currently, C<tr> is mapped to C<row>,
@@ -92,7 +98,7 @@
For similar reasons, 'base' often gives us trouble too ;)
-=item C<< $bool = __PACKAGE__->can_combine_empty_tags($tag) >>
+=item C<< $bool = $obj->can_combine_empty_tags($tag) >>
=back
Modified: Template-Declare/lib/Template/Declare/TagSet/XUL.pm
==============================================================================
--- Template-Declare/lib/Template/Declare/TagSet/XUL.pm (original)
+++ Template-Declare/lib/Template/Declare/TagSet/XUL.pm Mon Aug 13 02:05:57 2007
@@ -61,7 +61,8 @@
=head1 SYNOPSIS
use Template::Declare::TagSet::XUL;
- my $tagset = 'Template::Declare::TagSet::XUL';
+ my $tagset = Template::Declare::TagSet::XUL->new(
+ namespace => undef, package => 'self');
my $list = $tagset->get_tag_list();
print "@$list";
@@ -89,19 +90,23 @@
=over
-=item C<< $list = __PACKAGE__->get_tag_list() >>
+=item C<< $obj = Template::Declare::TagSet::XUL->new({ namespace => $XML_namespace, package => $Perl_package }) >>
+
+Constructor inherited from L<Template::Declare::TagSet>.
+
+=item C<< $list = $obj->get_tag_list() >>
Returns an array ref for the tag names.
The tag list was extracted from L<http://www.xulplanet.com/references/elemref/refall_elemref.xml> (only C<< <element name='...'> >> were recognized).
-=item C<< $bool = __PACKAGE__->get_alternate_spelling($tag) >>
+=item C<< $bool = $obj->get_alternate_spelling($tag) >>
Returns the alternative spelling for a given tag if any or
undef otherwise. Currently, C<template> is mapped to C<xul_template> because there is already a C<template> sub exported
by L<Template::Declare::Tags>.
-=item C<< $bool = __PACKAGE__->can_combine_empty_tags($tag) >>
+=item C<< $bool = $obj->can_combine_empty_tags($tag) >>
Always returns true (inherited directly from the base class,
L<Template::Declare::TagSet>.
More information about the Jifty-commit
mailing list