Changeset 3531 for trunk/lib/MT/ObjectDriver/Driver/DBI.pm
- Timestamp:
- 03/12/09 09:11:52 (9 months ago)
- Files:
-
- 1 modified
-
trunk/lib/MT/ObjectDriver/Driver/DBI.pm (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/lib/MT/ObjectDriver/Driver/DBI.pm
r3082 r3531 1 # Movable Type (r) Open Source (C) 2001-200 8Six Apart, Ltd.1 # Movable Type (r) Open Source (C) 2001-2009 Six Apart, Ltd. 2 2 # This program is distributed under the terms of the 3 3 # GNU General Public License, version 2. … … 19 19 $driver->connect_options($opts); 20 20 $driver; 21 } 22 23 sub start_query { 24 my $driver = shift; 25 my ($sql, $bind) = @_; 26 if ($MT::DebugMode && $MT::DebugMode & 4) { 27 $sql =~ s/\r?\n/ /g; 28 warn "QUERY: $sql"; 29 } 30 return $driver->SUPER::start_query(@_); 21 31 } 22 32 … … 85 95 my ($class) = @_; 86 96 return $driver->direct_remove($class); 97 } 98 99 sub direct_remove { 100 my $driver = shift; 101 my ($class, $orig_terms, $orig_args) = @_; 102 $class->call_trigger('pre_direct_remove', $orig_terms, $orig_args); 103 $driver->SUPER::direct_remove(@_); 87 104 } 88 105 … … 589 606 @returnvals parameter holds the additional data that wiil be retured. 590 607 608 =back 609 591 610 =head1 AUTHOR & COPYRIGHT 592 611
