Index: openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl 3 May 2001 04:00:49 -0000 1.3 +++ openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl 9 May 2001 05:15:58 -0000 1.4 @@ -1,6 +1,6 @@ # upload an item revision from a file -proc cr_revision_upload { title item_id path } { +ad_proc -public cr_revision_upload { title item_id path } { set revision_id [db_exec_plsql get_revision_id "begin :1 := content_revision.new(title => :title,