[open-ils-commits] r12871 - trunk/Open-ILS/src/sql/Pg (miker)

[svn at svn.open-ils.org]

Author: miker
Date: 2009-04-14 21:10:02 -0400 (Tue, 14 Apr 2009)
New Revision: 12871

Modified:
   trunk/Open-ILS/src/sql/Pg/090.schema.action.sql
Log:
have the merge proc delete the source record after asset merging

Modified: trunk/Open-ILS/src/sql/Pg/090.schema.action.sql
===================================================================
--- trunk/Open-ILS/src/sql/Pg/090.schema.action.sql	2009-04-15 00:47:06 UTC (rev 12870)
+++ trunk/Open-ILS/src/sql/Pg/090.schema.action.sql	2009-04-15 01:10:02 UTC (rev 12871)
@@ -476,6 +476,9 @@
 		moved_objects := moved_objects + 1;
 	END LOOP;
 
+    -- Finally, "delete" the source record
+    DELETE FROM biblio.record_entry WHERE id = source_record;
+
 	-- That's all, folks!
 	RETURN moved_objects;
 END;