Index: openacs-4/packages/bookmarks/www/delete-dead-links.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bookmarks/www/delete-dead-links.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/bookmarks/www/delete-dead-links.tcl 10 Sep 2002 22:22:26 -0000 1.2 +++ openacs-4/packages/bookmarks/www/delete-dead-links.tcl 30 Sep 2003 12:10:04 -0000 1.3 @@ -52,7 +52,7 @@ if [catch {db_exec_plsql delete_dead_link " begin - bookmark.delete ( + bookmark.del ( bookmark_id => :bookmark_id ); end;"} errmsg] { @@ -71,7 +71,7 @@ # Delete the url it self if [catch {db_exec_plsql delete_dead_link " begin - url.delete ( + url.del ( url_id => :url_id ); end;"} errmsg] {