Showing 4 changed files with 7 additions and 261 deletions
+1 -1
Changes
... ...
@@ -1,4 +1,4 @@
1
-0.1692
1
+0.1693
2 2
     - separate DBIx::Custom type_rule from filter
3 3
     - DBIx::Custom::Model filter attrribute is DEPRECATED!
4 4
     - DBIx::Custom::Model name attribute is DEPRECATED!
+5 -232
lib/DBIx/Custom.pm
... ...
@@ -1804,8 +1804,6 @@ C<default_dbi_option> to L<DBIx::Connector>.
1804 1804
 
1805 1805
 Data source name, used when C<connect()> is executed.
1806 1806
 
1807
-C<data_source> is DEPRECATED! It is renamed to C<dsn>.
1808
-
1809 1807
 =head2 C<dbi_option>
1810 1808
 
1811 1809
     my $dbi_option = $dbi->dbi_option;
... ...
@@ -2428,6 +2426,10 @@ If that contain upper case charactor, you specify it lower case.
2428 2426
 
2429 2427
 =back
2430 2428
 
2429
+You get all type name used in database by C<available_type_name>.
2430
+
2431
+    print $dbi->available_type_name;
2432
+
2431 2433
 In C<from> you can't specify type name defined by create table.
2432 2434
 You must specify data type, this is internal one.
2433 2435
 You get all data type by C<available_data_type>.
... ...
@@ -2436,21 +2438,6 @@ You get all data type by C<available_data_type>.
2436 2438
 
2437 2439
 Type rule of C<from> is enabled on the following pattern.
2438 2440
 
2439
-=item 1. column name
2440
-
2441
-    issue_date
2442
-    issue_datetime
2443
-
2444
-=item 2. table name and column name, separator is dot
2445
-
2446
-    book.issue_date
2447
-    book.issue_datetime
2448
-
2449
-=item 3. table name and column name, separator is double underbar
2450
-
2451
-    book__issue_date
2452
-    book__issue_datetime
2453
-
2454 2441
 =item 4. table name and column name, separator is hyphen
2455 2442
 
2456 2443
     book-issue_date
... ...
@@ -2730,7 +2717,7 @@ Same as C<execute> method's C<type> option.
2730 2717
 
2731 2718
 =item C<type_rule_off> EXPERIMENTAL
2732 2719
 
2733
-Turn type rule off.
2720
+Same as C<execute> method's <type_rule_off>.
2734 2721
 
2735 2722
 =back
2736 2723
 
... ...
@@ -2749,8 +2736,6 @@ Create update parameter tag.
2749 2736
 
2750 2737
     set title = :title, author = :author
2751 2738
 
2752
-C<no_set> option is DEPRECATED! use C<assing_param> instead.
2753
-
2754 2739
 =head2 C<where>
2755 2740
 
2756 2741
     my $where = $dbi->where(
... ...
@@ -2767,128 +2752,6 @@ Create a new L<DBIx::Custom::Where> object.
2767 2752
 Setup all model objects.
2768 2753
 C<columns> of model object is automatically set, parsing database information.
2769 2754
 
2770
-=head2 C<update_at()> DEPRECATED!
2771
-
2772
-Update statement, using primary key.
2773
-
2774
-    $dbi->update_at(
2775
-        table => 'book',
2776
-        primary_key => 'id',
2777
-        where => '5',
2778
-        param => {title => 'Perl'}
2779
-    );
2780
-
2781
-This method is same as C<update()> exept that
2782
-C<primary_key> is specified and C<where> is constant value or array refrence.
2783
-all option of C<update()> is available.
2784
-
2785
-=head2 C<delete_at()> DEPRECATED!
2786
-
2787
-Delete statement, using primary key.
2788
-
2789
-    $dbi->delete_at(
2790
-        table => 'book',
2791
-        primary_key => 'id',
2792
-        where => '5'
2793
-    );
2794
-
2795
-This method is same as C<delete()> exept that
2796
-C<primary_key> is specified and C<where> is constant value or array refrence.
2797
-all option of C<delete()> is available.
2798
-
2799
-=head2 C<select_at()> DEPRECATED!
2800
-
2801
-Select statement, using primary key.
2802
-
2803
-    $dbi->select_at(
2804
-        table => 'book',
2805
-        primary_key => 'id',
2806
-        where => '5'
2807
-    );
2808
-
2809
-This method is same as C<select()> exept that
2810
-C<primary_key> is specified and C<where> is constant value or array refrence.
2811
-all option of C<select()> is available.
2812
-
2813
-=head2 C<register_tag> DEPRECATED!
2814
-
2815
-    $dbi->register_tag(
2816
-        update => sub {
2817
-            my @columns = @_;
2818
-            
2819
-            # Update parameters
2820
-            my $s = 'set ';
2821
-            $s .= "$_ = ?, " for @columns;
2822
-            $s =~ s/, $//;
2823
-            
2824
-            return [$s, \@columns];
2825
-        }
2826
-    );
2827
-
2828
-Register tag, used by C<execute()>.
2829
-
2830
-See also L<Tags/Tags> about tag registered by default.
2831
-
2832
-Tag parser receive arguments specified in tag.
2833
-In the following tag, 'title' and 'author' is parser arguments
2834
-
2835
-    {update_param title author} 
2836
-
2837
-Tag parser must return array refrence,
2838
-first element is the result statement, 
2839
-second element is column names corresponding to place holders.
2840
-
2841
-In this example, result statement is 
2842
-
2843
-    set title = ?, author = ?
2844
-
2845
-Column names is
2846
-
2847
-    ['title', 'author']
2848
-
2849
-=head2 C<apply_filter> DEPRECATED!
2850
-
2851
-    $dbi->apply_filter(
2852
-        'book',
2853
-        'issue_date' => {
2854
-            out => 'tp_to_date',
2855
-            in  => 'date_to_tp',
2856
-            end => 'tp_to_displaydate'
2857
-        },
2858
-        'write_date' => {
2859
-            out => 'tp_to_date',
2860
-            in  => 'date_to_tp',
2861
-            end => 'tp_to_displaydate'
2862
-        }
2863
-    );
2864
-
2865
-Apply filter to columns.
2866
-C<out> filter is executed before data is send to database.
2867
-C<in> filter is executed after a row is fetch.
2868
-C<end> filter is execute after C<in> filter is executed.
2869
-
2870
-Filter is applied to the follwoing tree column name pattern.
2871
-
2872
-       PETTERN         EXAMPLE
2873
-    1. Column        : author
2874
-    2. Table.Column  : book.author
2875
-    3. Table__Column : book__author
2876
-    4. Table-Column  : book-author
2877
-
2878
-If column name is duplicate with other table,
2879
-Main filter specified by C<table> option is used.
2880
-
2881
-You can set multiple filters at once.
2882
-
2883
-    $dbi->apply_filter(
2884
-        'book',
2885
-        [qw/issue_date write_date/] => {
2886
-            out => 'tp_to_date',
2887
-            in  => 'date_to_tp',
2888
-            end => 'tp_to_displaydate'
2889
-        }
2890
-    );
2891
-
2892 2755
 =head1 Parameter
2893 2756
 
2894 2757
 Parameter start at ':'. This is replaced to place holoder
... ...
@@ -2900,96 +2763,6 @@ Parameter start at ':'. This is replaced to place holoder
2900 2763
 
2901 2764
     "select * from book where title = ? and author = ?"
2902 2765
 
2903
-=head1 Tags DEPRECATED!
2904
-
2905
-B<Tag> system is DEPRECATED! use parameter system :name instead.
2906
-Parameter is simple and readable.
2907
-
2908
-Note that you can't use both tag and paramter at same time.
2909
-
2910
-The following tags is available.
2911
-
2912
-=head2 C<?> DEPRECATED!
2913
-
2914
-Placeholder tag.
2915
-
2916
-    {? NAME}    ->   ?
2917
-
2918
-=head2 C<=> DEPRECATED!
2919
-
2920
-Equal tag.
2921
-
2922
-    {= NAME}    ->   NAME = ?
2923
-
2924
-=head2 C<E<lt>E<gt>> DEPRECATED!
2925
-
2926
-Not equal tag.
2927
-
2928
-    {<> NAME}   ->   NAME <> ?
2929
-
2930
-=head2 C<E<lt>> DEPRECATED!
2931
-
2932
-Lower than tag
2933
-
2934
-    {< NAME}    ->   NAME < ?
2935
-
2936
-=head2 C<E<gt>> DEPRECATED!
2937
-
2938
-Greater than tag
2939
-
2940
-    {> NAME}    ->   NAME > ?
2941
-
2942
-=head2 C<E<gt>=> DEPRECATED!
2943
-
2944
-Greater than or equal tag
2945
-
2946
-    {>= NAME}   ->   NAME >= ?
2947
-
2948
-=head2 C<E<lt>=> DEPRECATED!
2949
-
2950
-Lower than or equal tag
2951
-
2952
-    {<= NAME}   ->   NAME <= ?
2953
-
2954
-=head2 C<like> DEPRECATED!
2955
-
2956
-Like tag
2957
-
2958
-    {like NAME}   ->   NAME like ?
2959
-
2960
-=head2 C<in> DEPRECATED!
2961
-
2962
-In tag.
2963
-
2964
-    {in NAME COUNT}   ->   NAME in [?, ?, ..]
2965
-
2966
-=head2 C<insert_param> DEPRECATED!
2967
-
2968
-Insert parameter tag.
2969
-
2970
-    {insert_param NAME1 NAME2}   ->   (NAME1, NAME2) values (?, ?)
2971
-
2972
-=head2 C<update_param> DEPRECATED!
2973
-
2974
-Updata parameter tag.
2975
-
2976
-    {update_param NAME1 NAME2}   ->   set NAME1 = ?, NAME2 = ?
2977
-
2978
-=head2 C<insert_at()> DEPRECATED!
2979
-
2980
-Insert statement, using primary key.
2981
-
2982
-    $dbi->insert_at(
2983
-        table => 'book',
2984
-        primary_key => 'id',
2985
-        where => '5',
2986
-        param => {title => 'Perl'}
2987
-    );
2988
-
2989
-This method is same as C<insert()> exept that
2990
-C<primary_key> is specified and C<where> is constant value or array refrence.
2991
-all option of C<insert()> is available.
2992
-
2993 2766
 =head1 ENVIRONMENT VARIABLE
2994 2767
 
2995 2768
 =head2 C<DBIX_CUSTOM_DEBUG>
+1 -27
lib/DBIx/Custom/Model.pm
... ...
@@ -244,30 +244,4 @@ you don't have to specify C<table> option.
244 244
 Same as C<update_all()> of L<DBIx::Custom> except that
245 245
 you don't have to specify table name.
246 246
 
247
-=head2 C<update_at> DEPRECATED!
248
-
249
-    $table->update_at(...);
250
-    
251
-Same as C<update_at()> of L<DBIx::Custom> except that
252
-you don't have to specify C<table> and C<primary_key> option.
253
-
254
-=head2 C<select_at> DEPRECATED!
255
-
256
-    $table->select_at(...);
257
-    
258
-Same as C<select_at()> of L<DBIx::Custom> except that
259
-you don't have to specify C<table> and C<primary_key> option.
260
-
261
-=head2 C<insert_at> DEPRECATED!
262
-
263
-    $table->insert_at(...);
264
-    
265
-Same as C<insert_at()> of L<DBIx::Custom> except that
266
-you don't have to specify C<table> and C<primary_key> option.
267
-
268
-=head2 C<delete_at> DEPRECATED!
269
-
270
-    $table->delete_at(...);
271
-    
272
-Same as C<delete()> of L<DBIx::Custom> except that
273
-you don't have to specify C<table> and C<primary_key> option.
247
+=cut
-1
lib/DBIx/Custom/Tag.pm
... ...
@@ -1,4 +1,3 @@
1
-# DEPRECATED!
2 1
 package DBIx::Custom::Tag;
3 2
 
4 3
 use strict;