Index: openacs-4/packages/acs-kernel/sql/oracle/rel-segments-body-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/oracle/rel-segments-body-create.sql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-kernel/sql/oracle/rel-segments-body-create.sql	20 Mar 2001 22:51:55 -0000	1.1
+++ openacs-4/packages/acs-kernel/sql/oracle/rel-segments-body-create.sql	16 Sep 2002 19:15:57 -0000	1.2
@@ -108,7 +108,7 @@
 
    if v_segment_id is null then
 
-      if v_segment_name is not null then
+      if segment_name is not null then
          v_segment_name := segment_name;
       else
          select groups.group_name || ' - ' || acs_object_types.pretty_name ||
