Index: openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs-oracle.xql,v
diff -u -r1.1 -r1.1.16.1
--- openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs-oracle.xql 14 Jan 2005 00:01:37 -0000 1.1
+++ openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs-oracle.xql 1 Oct 2020 11:24:12 -0000 1.1.16.1
@@ -1,4 +1,4 @@
-
+?xml version="1.0"?>
oracle8.1.6
@@ -12,20 +12,4 @@
-
-
-
- delete from dotlrn_community_applets where applet_id = :applet_id
-
-
-
-
-
-
-
- delete from dotlrn_applets where applet_id = :applet_id
-
-
-
-
Index: openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs-postgresql.xql,v
diff -u -r1.3 -r1.3.12.1
--- openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs-postgresql.xql 8 Aug 2006 21:26:34 -0000 1.3
+++ openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs-postgresql.xql 1 Oct 2020 11:24:12 -0000 1.3.12.1
@@ -34,21 +34,4 @@
-
-
-
-
- delete from dotlrn_community_applets where applet_id = :applet_id
-
-
-
-
-
-
-
- delete from dotlrn_applets where applet_id = :applet_id
-
-
-
-
Index: openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs.tcl,v
diff -u -r1.10.2.2 -r1.10.2.3
--- openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs.tcl 24 Aug 2020 15:04:39 -0000 1.10.2.2
+++ openacs-4/packages/dotlrn-evaluation/tcl/dotlrn-evaluation-procs.tcl 1 Oct 2020 11:24:12 -0000 1.10.2.3
@@ -41,10 +41,7 @@
ad_proc -public dotlrn_evaluation::remove_applet {} {
One time destroy.
} {
- set applet_id [dotlrn_applet::get_applet_id_from_key [my_package_key]]
- db_exec_plsql delete_applet_from_communities { *SQL* }
- db_exec_plsql delete_applet { *SQL* }
-# dotlrn_applet::remove_applet_from_dotlrn -applet_key [applet_key]
+ dotlrn_applet::remove_applet_from_dotlrn -applet_key [applet_key]
}
ad_proc -public dotlrn_evaluation::add_applet_to_community {