Changeset 1866
- Timestamp:
- 04/11/08 19:19:30 (5 months ago)
- Files:
-
- branches/release-34/build/mt-dists/default.mk (modified) (1 diff)
- branches/release-34/lib/MT/App/CMS.pm (modified) (17 diffs)
- branches/release-34/lib/MT/App/Trackback.pm (modified) (2 diffs)
- branches/release-34/lib/MT/CMS/Blog.pm (modified) (2 diffs)
- branches/release-34/lib/MT/CMS/Comment.pm (modified) (3 diffs)
- branches/release-34/lib/MT/CMS/Search.pm (modified) (1 diff)
- branches/release-34/lib/MT/CMS/TrackBack.pm (modified) (2 diffs)
- branches/release-34/lib/MT/Comment.pm (modified) (3 diffs)
- branches/release-34/lib/MT/TBPing.pm (modified) (2 diffs)
- branches/release-34/lib/MT/Upgrade.pm (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
branches/release-34/build/mt-dists/default.mk
r1731 r1866 2 2 3 3 PRODUCT_VERSION = 4.15 4 SCHEMA_VERSION = 4.005 24 SCHEMA_VERSION = 4.0053 5 5 API_VERSION = 4.15 6 6 branches/release-34/lib/MT/App/CMS.pm
r1858 r1866 755 755 { 756 756 created_on => [ $ts, undef ], 757 junk_status => [ 0, 1 ]757 junk_status => MT::Comment::NOT_JUNK(), 758 758 }, 759 759 { range_incl => { created_on => 1 }, unique => 1 } … … 821 821 handler => sub { 822 822 my ( $terms, $args ) = @_; 823 $terms->{junk_status} = [ 0, 1 ]; 823 require MT::TBPing; 824 $terms->{junk_status} = MT::TBPing::NOT_JUNK(); 824 825 }, 825 826 }, … … 831 832 require MT::Entry; 832 833 my $app = MT->instance; 833 $terms->{junk_status} = [ 0, 1 ];834 require MT::TBPing; 834 835 require MT::Trackback; 836 $terms->{junk_status} = MT::TBPing::NOT_JUNK(); 835 837 $args->{join} = MT::Trackback->join_on( 836 838 undef, … … 863 865 handler => sub { 864 866 my ( $terms, $args ) = @_; 865 $terms->{junk_status} = [ 0, 1 ]; 867 require MT::TBPing; 868 $terms->{junk_status} = MT::TBPing::NOT_JUNK(); 866 869 $terms->{visible} = 0; 867 870 }, … … 872 875 handler => sub { 873 876 my ( $terms, $args ) = @_; 874 $terms->{junk_status} = -1; 877 require MT::TBPing; 878 $terms->{junk_status} = MT::TBPing::NOT_JUNK(); 875 879 }, 876 880 }, … … 884 888 $terms->{created_on} = [ $ts, undef ]; 885 889 $args->{range_incl}{created_on} = 1; 886 $terms->{junk_status} = [ 0, 1 ];890 $terms->{junk_status} = MT::TBPing::NOT_JUNK(); 887 891 }, 888 892 }, … … 894 898 handler => sub { 895 899 my ( $terms, $args ) = @_; 896 $terms->{junk_status} = [ 0, 1 ]; 900 require MT::Comment; 901 $terms->{junk_status} = MT::Comment::NOT_JUNK(); 897 902 }, 898 903 }, … … 903 908 my ( $terms, $args ) = @_; 904 909 require MT::Entry; 910 require MT::Comment; 905 911 my $app = MT->instance; 906 $terms->{junk_status} = [ 0, 1 ];912 $terms->{junk_status} = MT::Comment::NOT_JUNK(); 907 913 # This join syntax employs a hack that allows us 908 914 # to do joins on abitrary columns. Typically, … … 932 938 handler => sub { 933 939 my ( $terms, $args ) = @_; 934 $terms->{junk_status} = [ 0, 1 ]; 940 require MT::Comment; 941 $terms->{junk_status} = MT::Comment::NOT_JUNK(); 935 942 $terms->{visible} = 0; 936 943 }, … … 941 948 handler => sub { 942 949 my ( $terms, $args ) = @_; 943 $terms->{junk_status} = -1; 950 require MT::Comment; 951 $terms->{junk_status} = MT::Comment::JUNK(); 944 952 }, 945 953 }, … … 952 960 }, 953 961 }, 954 # my_comments => {955 # label => 'My comments',956 # order => 600,957 # handler => sub {958 # my ( $terms, $args ) = @_;959 # $terms->{commenter_id} = $app->user->id;960 # },961 # },962 962 last_7_days => { 963 963 label => 'Comments in the last 7 days', … … 965 965 handler => sub { 966 966 my ( $terms, $args ) = @_; 967 require MT::Comment; 967 968 my $ts = time - 7 * 24 * 60 * 60; 968 969 $ts = epoch2ts( MT->app->blog, $ts ); 969 970 $terms->{created_on} = [ $ts, undef ]; 970 971 $args->{range_incl}{created_on} = 1; 971 $terms->{junk_status} = [ 0, 1 ]; 972 }, 973 }, 974 # last_24_hours => { 975 # label => 'All comments in the last 24 hours', 976 # order => 800, 977 # handler => sub { 978 # my ( $terms, $args ) = @_; 979 # my $ts = time - 24 * 60 * 60; 980 # $ts = epoch2ts( MT->app->blog, $ts ); 981 # $terms->{created_on} = [ $ts, undef ]; 982 # $args->{range_incl}{created_on} = 1; 983 # $terms->{junk_status} = [ 0, 1 ]; 984 # }, 985 # }, 972 $terms->{junk_status} = MT::Comment::NOT_JUNK(); 973 }, 974 }, 986 975 _comments_by_user => { 987 976 label => sub { … … 1019 1008 handler => sub { 1020 1009 my ( $terms, $args ) = @_; 1010 require MT::Comment; 1021 1011 my $entry_id = int( MT->app->param('filter_val') ); 1022 1012 $terms->{entry_id} = $entry_id; 1023 $terms->{junk_status} = [ 0, 1 ];1013 $terms->{junk_status} = MT::Comment::NOT_JUNK(); 1024 1014 }, 1025 1015 }, … … 1057 1047 handler => sub { 1058 1048 my ( $terms, $args ) = @_; 1049 require MT::Comment; 1059 1050 my $val = $app->param('filter_val'); 1060 1051 my ( $from, $to ) = split /-/, $val; … … 1063 1054 $to = undef unless $to =~ m/^\d{8}$/; 1064 1055 $to .= '235959'; 1065 $terms->{junk_status} = [ 0, 1 ];1056 $terms->{junk_status} = MT::Comment::NOT_JUNK(); 1066 1057 $terms->{created_on} = 1067 1058 [ MT::Object::ts2db($from), MT::Object::ts2db($to) ]; … … 3309 3300 my $tb_count_iter = 3310 3301 MT::TBPing->count_group_by( 3311 { blog_id => $blog_id, junk_status => [ 0, 1 ]},3302 { blog_id => $blog_id, junk_status => MT::TBPing::NOT_JUNK() }, 3312 3303 { group => ['tb_id'] } ); 3313 3304 while ( my ( $count, $tb_id ) = $tb_count_iter->() ) { … … 3390 3381 { 3391 3382 tb_id => $tb->id, 3392 junk_status => [ 0, 1 ]3383 junk_status => MT::TBPing::NOT_JUNK(), 3393 3384 } 3394 3385 ); branches/release-34/lib/MT/App/Trackback.pm
r1823 r1866 306 306 $ping->source_url($url); 307 307 $ping->ip( $app->remote_ip || '' ); 308 $ping->junk_status(0);309 308 $ping->visible(1); 310 309 } … … 594 593 ); 595 594 } 596 $arg{not} = { junk_status => 1 };597 595 my $iter = MT::TBPing->load_iter( 598 596 { 599 597 tb_id => $tb->id, 600 junk_status => -1,598 junk_status => MT::TBPing::NOT_JUNK(), 601 599 visible => 1 602 600 }, branches/release-34/lib/MT/CMS/Blog.pm
r1823 r1866 1777 1777 ? $comment_count->{$blog_id} 1778 1778 : $comment_count->{$blog_id} = MT::Comment->count( 1779 { blog_id => $blog_id, junk_status => [ 0, 1 ]}1779 { blog_id => $blog_id, junk_status => MT::Comment::NOT_JUNK() } 1780 1780 ) 1781 1781 ) … … 1784 1784 $ping_count ? $ping_count->{$blog_id} : $ping_count->{$blog_id} = 1785 1785 MT::TBPing->count( 1786 { blog_id => $blog_id, junk_status => [ 0, 1 ]}1786 { blog_id => $blog_id, junk_status => MT::TBPing::NOT_JUNK() } 1787 1787 ) 1788 1788 ) || 0; branches/release-34/lib/MT/CMS/Comment.pm
r1823 r1866 273 273 if ( $filter_col eq 'status' ) { 274 274 if ( $val eq 'approved' ) { 275 $terms{ junk_status} = 1;275 $terms{visible} = 1; 276 276 } 277 277 elsif ( $val eq 'pending' ) { 278 $terms{ junk_status} = 0;278 $terms{visible} = 0; 279 279 } 280 280 elsif ( $val eq 'junk' ) { 281 $terms{junk_status} = -1;281 $terms{junk_status} = MT::Comment::JUNK(); 282 282 } 283 283 else { 284 $terms{junk_status} = [ 0, 1 ];284 $terms{junk_status} = MT::Comment::NOT_JUNK(); 285 285 } 286 286 } … … 934 934 my $class = $app->model($type); 935 935 my $arg = {}; 936 $arg->{junk_status} = -1; 936 require MT::Comment; 937 $arg->{junk_status} = MT::Comment::JUNK(); 937 938 $arg->{blog_id} = $blog_id if $blog_id; 938 939 $class->remove($arg); … … 1446 1447 elsif ( $status eq 'moderate' ) { 1447 1448 $obj->moderate; 1448 $obj->junk_status(0);1449 1449 } 1450 1450 elsif ( $status eq 'junk' ) { branches/release-34/lib/MT/CMS/Search.pm
r1823 r1866 412 412 } 413 413 if ( $class->has_column('junk_status') ) { 414 require MT::Comment; 414 415 if ($is_junk) { 415 $terms{junk_status} = -1;416 $terms{junk_status} = MT::Comment::JUNK(); 416 417 } 417 418 else { 418 $terms{junk_status} = [ 0, 1 ];419 $terms{junk_status} = MT::Comment::NOT_JUNK(); 419 420 } 420 421 } branches/release-34/lib/MT/CMS/TrackBack.pm
r1823 r1866 152 152 ## entries. 153 153 my %arg; 154 require MT::TBPing; 154 155 if ( ( $app->param('tab') || '' ) eq 'junk' ) { 155 156 $app->param( 'filter', 'junk_status' ); 156 $app->param( 'filter_val', '-1');157 $app->param( 'filter_val', MT::TBPing::JUNK() ); 157 158 $param{filter_special} = 1; 158 159 $param{filter_phrase} = $app->translate('Junk TrackBacks'); 159 160 } 160 161 else { 161 $terms{'junk_status'} = [ 0, 1 ];162 $terms{'junk_status'} = MT::TBPing::NOT_JUNK(); 162 163 } 163 164 … … 473 474 elsif ( $status eq 'moderate' ) { 474 475 $obj->moderate; 475 $obj->junk_status(0);476 476 } 477 477 elsif ( $status eq 'junk' ) { branches/release-34/lib/MT/Comment.pm
r1578 r1866 10 10 use base qw( MT::Object MT::Scorable ); 11 11 use MT::Util qw( weaken ); 12 13 sub JUNK () { -1 } 14 sub NOT_JUNK () { 1 } 12 15 13 16 __PACKAGE__->install_properties({ … … 55 58 }, 56 59 defaults => { 57 junk_status => 0,60 junk_status => NOT_JUNK, 58 61 last_moved_on => '20000101000000', 59 62 }, … … 62 65 primary_key => 'id', 63 66 }); 64 65 sub JUNK () { -1 }66 sub NOT_JUNK () { 1 }67 67 68 68 my %blocklists = (); branches/release-34/lib/MT/TBPing.pm
r1578 r1866 10 10 use base qw( MT::Object MT::Scorable ); 11 11 12 use constant JUNK => -1; 13 use constant NOT_JUNK => 1; 12 sub JUNK() { -1 } 13 sub NOT_JUNK () { 1 } 14 14 15 15 __PACKAGE__->install_properties({ … … 52 52 }, 53 53 defaults => { 54 junk_status => 0,54 junk_status => NOT_JUNK, 55 55 last_moved_on => '20000101000000', 56 56 }, branches/release-34/lib/MT/Upgrade.pm
r1806 r1866 463 463 }, 464 464 'core_init_comment_junk_status' => { 465 on_field => 'MT::Comment->junk_status',465 version_limit => 4.0053, 466 466 priority => 3.1, 467 467 updater => { 468 468 type => 'comment', 469 condition => sub { ! defined$_[0]->junk_status },469 condition => sub { !$_[0]->junk_status }, 470 470 code => sub { $_[0]->junk_status(1) }, 471 471 label => 'Assigning junk status for comments...', 472 472 sql => 'update mt_comment set comment_junk_status = 1 473 where comment_junk_status is null', 473 where comment_junk_status is null 474 or comment_junk_status=0', 474 475 } 475 476 }, … … 487 488 }, 488 489 'core_init_tbping_junk_status' => { 489 on_field => 'MT::TBPing->junk_status',490 version_limit => 4.0053, 490 491 priority => 3.1, 491 492 updater => { 492 493 type => 'tbping', 493 condition => sub { ! defined$_[0]->junk_status },494 condition => sub { !$_[0]->junk_status }, 494 495 code => sub { $_[0]->junk_status(1) }, 495 496 label => 'Assigning junk status for TrackBacks...', 496 497 sql => 'update mt_tbping set tbping_junk_status = 1 497 where tbping_junk_status is null', 498 where tbping_junk_status is null 499 or tbping_junk_status=0', 498 500 } 499 501 },
