[COMMIT LOGREPORT] service/all/lib/Lire DerivedSchema.pm,1.17,1.18

[Francis J. Lacoste]

Update of /cvsroot/logreport/service/all/lib/Lire
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19008/all/lib/Lire

Modified Files:
	DerivedSchema.pm 
Log Message:
Do not delete records in the derived schemas when records in the base
schemas is deleted (only delete the links). One might want to keep the
derived information for longer period than the base information.


Index: DerivedSchema.pm
===================================================================
RCS file: /cvsroot/logreport/service/all/lib/Lire/DerivedSchema.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -r1.17 -r1.18
--- DerivedSchema.pm	8 Jun 2004 13:51:33 -0000	1.17
+++ DerivedSchema.pm	17 Jun 2005 20:22:13 -0000	1.18
@@ -138,12 +138,11 @@
 
     $store->_dbh()->do( sprintf( q{CREATE TRIGGER %s AFTER DELETE ON %s
 BEGIN
-    DELETE FROM %s WHERE dlf_id IN ( SELECT src_id FROM %s WHERE src_id = old.dlf_id );
+    DELETE FROM %s WHERE src_id = old.dlf_id;
 END
 },
                                  $self->sql_table( '', '_delete_trigger' ),
                                  $self->base()->sql_table(),
-                                 $self->sql_table(),
                                  $self->sql_table( '', '_links' )
                                ) );
 

-- 
To UNSUBSCRIBE, email to commit-request at logreport.org with a subject of 
"unsubscribe". Trouble? Send an email with subject "help" to 
commit-request at logreport.org