Index: openacs.org-dev/packages/acs-kernel/sql/oracle/rel-segments-body-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/acs-kernel/sql/oracle/rel-segments-body-create.sql,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/acs-kernel/sql/oracle/rel-segments-body-create.sql	9 Jul 2002 17:34:58 -0000	1.1.1.1
+++ openacs.org-dev/packages/acs-kernel/sql/oracle/rel-segments-body-create.sql	8 Oct 2002 15:46:45 -0000	1.1.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 ||
