Index: openacs-4/packages/acs-content-repository/sql/oracle/content-folder.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/oracle/content-folder.sql,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/acs-content-repository/sql/oracle/content-folder.sql	29 Jun 2004 10:17:35 -0000	1.14
+++ openacs-4/packages/acs-content-repository/sql/oracle/content-folder.sql	13 Jan 2005 13:55:07 -0000	1.15
@@ -445,14 +445,15 @@
   open c_tree_cur;
   while v_parent_id <> folder_id loop
     fetch c_tree_cur into v_parent_id;
+
+    if v_parent_id = folder_id then
+        v_sub_folder_p := 't';
+    end if;
+
     exit when c_tree_cur%NOTFOUND;
   end loop;
   close c_tree_cur;
 
-  if v_parent_id ^= 0 then 
-    v_sub_folder_p := 't';
-  end if;
-
   return v_sub_folder_p;
 
 end is_sub_folder;
