Index: openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-drop.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-drop.sql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-drop.sql	14 Mar 2001 04:39:10 -0000	1.1
+++ openacs-4/packages/acs-kernel/sql/postgresql/rel-segments-drop.sql	17 Mar 2001 21:46:06 -0000	1.2
@@ -9,7 +9,8 @@
 declare 
         r       record;
 begin
-    for r in (select segment_id from rel_segments) loop
+    for r in select segment_id from rel_segments 
+    LOOP
 	PERFORM rel_segment__delete(r.segment_id);
     end loop;