Changeset 30879

Timestamp:

03/06/09 11:04:26 (4 years ago)

Author:

okamura

Message:

add method test

Location:

lang/perl/SimpleCRUD/trunk

Files:

• lib/SimpleCRUD.pm (modified) (2 diffs)
• t/01-method.t (added)

lang/perl/SimpleCRUD/trunk/lib/SimpleCRUD.pm

@@ -30 +30 @@
     my $crud = SimpleCRUD->new($config);
     my $xhtml = $crud->listing('Books');
-    
+   
 =head1 METHODS
 
 =head2 new
+
 =head2 listing
+
 =head2 detail
+
 =head2 upsert
+
 =head2 do_upsert
+
 =head2 delete
+
 =head2 tables
+
 =head2 registrations
-
-=head1 PRIVATE METHODS
-
-=head2 _schema
-=head2 _base_url
-=head2 _column
-=head2 _column_of
-=head2 _primaries
-=head2 _orderd_columns
-=head2 _relationship
-=head2 _relationship_of
-=head2 _b2_accessor
-=head2 _b2_resultset
-=head2 _m2m_accessors
-=head2 _m2m_metadata
-=head2 _m2m_resultset
-=head2 _ordered_columns
-=head2 _pager
-=head2 _record
-=head2 _records
-=head2 _rel_class_of
-=head2 _rel_cond_of
-=head2 _rel_names
-=head2 _rel_type_of
-=head2 _result_source_name
 
 =cut
@@ -270 +252 @@
 
 sub registrations   { [ keys %{ $_[0]->_schema->source_registrations }] }
+
+
+=head1 PRIVATE METHODS
+
+=head2 _schema
+
+=head2 _base_url
+
+=head2 _column
+
+=head2 _column_of
+
+=head2 _primaries
+
+=head2 _ordered_columns
+
+=head2 _relationship
+
+=head2 _relationship_of
+
+=head2 _b2_accessor
+
+=head2 _b2_resultset
+
+=head2 _m2m_accessors
+
+=head2 _m2m_metadata
+
+=head2 _m2m_resultset
+
+=head2 _ordered_columns
+
+=head2 _pager
+
+=head2 _record
+
+=head2 _records
+
+=head2 _rel_class_of
+
+=head2 _rel_cond_of
+
+=head2 _rel_names
+
+=head2 _rel_type_of
+
+=head2 _result_source_name
+
+=cut
 
 sub _render {