Index: openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl,v
diff -u -N -r1.20 -r1.21
--- openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl	12 Apr 2007 11:52:35 -0000	1.20
+++ openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl	17 Sep 2007 12:58:30 -0000	1.21
@@ -269,19 +269,6 @@
 }
 
 
-ad_proc -public content::revision::export_xml {
-    -revision_id:required
-} {
-    @param revision_id
-
-    @return NUMBER(38)
-} {
-    return [package_exec_plsql -var_list [list \
-        [list revision_id $revision_id ] \
-    ] content_revision export_xml]
-}
-
-
 ad_proc -public content::revision::get_number {
     -revision_id:required
 } {
@@ -295,25 +282,6 @@
 }
 
 
-ad_proc -public content::revision::import_xml {
-    -item_id:required
-    -revision_id:required
-    -doc_id:required
-} {
-    @param item_id
-    @param revision_id
-    @param doc_id
-
-    @return NUMBER(38)
-} {
-    return [package_exec_plsql -var_list [list \
-        [list item_id $item_id ] \
-        [list revision_id $revision_id ] \
-        [list doc_id $doc_id ] \
-    ] content_revision import_xml]
-}
-
-
 ad_proc -public content::revision::index_attributes {
     -revision_id:required
 } {
@@ -364,25 +332,7 @@
 }
 
 
-ad_proc -public content::revision::read_xml {
-    -item_id:required
-    -revision_id:required
-    -clob_loc:required
-} {
-    @param item_id
-    @param revision_id
-    @param clob_loc
 
-    @return NUMBER
-} {
-    return [package_exec_plsql -var_list [list \
-        [list item_id $item_id ] \
-        [list revision_id $revision_id ] \
-        [list clob_loc $clob_loc ] \
-    ] content_revision read_xml]
-}
-
-
 ad_proc -public content::revision::replace {
     -revision_id:required
     -search:required
@@ -435,29 +385,6 @@
 }
 
 
-ad_proc -public content::revision::write_xml {
-    -revision_id:required
-    -clob_loc:required
-} {
-    @param revision_id
-    @param clob_loc
-
-    @return NUMBER
-} {
-    return [package_exec_plsql -var_list [list \
-        [list revision_id $revision_id ] \
-        [list clob_loc $clob_loc ] \
-    ] content_revision write_xml]
-}
-
-
-ad_proc -public content::revision::update_attribute_index {
-} {
-} {
-    return [package_exec_plsql content_revision update_attribute_index]
-}
-
-
 ad_proc -public content::revision::get_cr_file_path {
     -revision_id 
 } {