Index: openacs-4/packages/dynamic-types/tcl/form-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dynamic-types/tcl/form-procs.xql,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/dynamic-types/tcl/form-procs.xql	4 Jun 2005 12:50:03 -0000	1.3
+++ openacs-4/packages/dynamic-types/tcl/form-procs.xql	28 Oct 2005 17:09:20 -0000	1.4
@@ -11,7 +11,7 @@
 
 <fullquery name="dtype::form::process.update_content"> 
 	<querytext>
-      update cr_revisions set content = (select content from cr_revisions where revision_id = :prev_revision_id)
+      update cr_revisions set content = (select content from cr_revisions where revision_id = :prev_revision_id) where revision_id = :revision_id
 	</querytext>
 </fullquery>