[Rt-commit] r10172 - in rt/branches/3.999-DANGEROUS: . lib/RT/Shredder/Plugin

[jesse at bestpractical.com]

Author: jesse
Date: Fri Dec 28 01:35:42 2007
New Revision: 10172

Modified:
   rt/branches/3.999-DANGEROUS/   (props changed)
   rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Plugin/Attachments.pm
   rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Plugin/Base.pm
   rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Record.pm

Log:
 r74298 at pinglin:  jesse | 2007-12-28 01:28:25 -0500
  checkpoint


Modified: rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Plugin/Attachments.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Plugin/Attachments.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Plugin/Attachments.pm	Fri Dec 28 01:35:42 2007
@@ -122,7 +122,7 @@
     if( $self->{'opt'}{'limit'} ) {
         Jifty->handle->apply_limits( \$query, $self->{'opt'}{'limit'} );
     }
-    my $sth = Jifty->handle->SimpleQuery( $query, @values );
+    my $sth = Jifty->handle->simple_query( $query, @values );
     return (0, "Internal error: '$sth'. Please send bug report.") unless $sth;
 
     my @objs;

Modified: rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Plugin/Base.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Plugin/Base.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Plugin/Base.pm	Fri Dec 28 01:35:42 2007
@@ -45,11 +45,14 @@
 # those contributions and any derivatives thereof.
 # 
 # END BPS TAGGED BLOCK }}}
-package RT::Shredder::Plugin::Base;
 
 use strict;
 use warnings FATAL => 'all';
 
+package RT::Shredder::Plugin::Base;
+use base qw/RT::Base/;
+
+
 =head1 name
 
 RT::Shredder::Plugin::Base - base class for Shredder plugins.
@@ -67,6 +70,7 @@
 sub _init
 {
     my $self = shift;
+    $self->_get_current_user(@_);
     $self->{'opt'} = { @_ };
 }
 

Modified: rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Record.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Record.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/Shredder/Record.pm	Fri Dec 28 01:35:42 2007
@@ -79,7 +79,7 @@
     my $res = "INSERT INTO ". $dbh->quote_identifier( $self->table );
     my $values = $self->{'values'};
     $res .= "(". join( ",", map { $dbh->quote_identifier( $_ ) } sort keys %$values ) .")";
-    $res .= " valueS";
+    $res .= " VALUES";
     $res .= "(". join( ",", map { $dbh->quote( $values->{$_} ) } sort keys %$values ) .")";
     $res .= ";";