Index: openacs-4/packages/news/www/admin/revision-add-3.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/revision-add-3.tcl,v diff -u -r1.13.2.2 -r1.13.2.3 --- openacs-4/packages/news/www/admin/revision-add-3.tcl 2 Jan 2016 20:34:50 -0000 1.13.2.2 +++ openacs-4/packages/news/www/admin/revision-add-3.tcl 27 Nov 2016 12:19:35 -0000 1.13.2.3 @@ -42,7 +42,7 @@ set active_revision_p "t" # Insert is 2-step process, same as in item-create-3.tcl -if [catch { +if {[catch { set revision_id [db_exec_plsql create_news_item_revision {}] set content_add [db_map content_add] @@ -55,7 +55,7 @@ } -blobs [list $publish_body] } -} errmsg ] { +} errmsg ]} { set complaint " [_ news.lt_The_database_did_not_] \ [_ news.lt_See_details_for_the_e]\n\n\t

$errmsg"