Index: openacs-4/packages/news/www/item-create-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item-create-3.tcl,v
diff -u -r1.19.2.1 -r1.19.2.2
--- openacs-4/packages/news/www/item-create-3.tcl	12 Sep 2015 11:06:42 -0000	1.19.2.1
+++ openacs-4/packages/news/www/item-create-3.tcl	25 Sep 2015 08:25:57 -0000	1.19.2.2
@@ -28,30 +28,27 @@
 set package_id [ad_conn package_id]
 permission::require_permission -object_id $package_id -privilege news_create
 
-
 set news_admin_p [permission::permission_p -object_id $package_id -privilege news_admin]
+
 # get instance-wide approval policy : [closed|wait|open]
 set approval_policy [parameter::get -parameter ApprovalPolicy -default "wait"]
 
+#
 # the news_admin or an open approval policy allow immediate publishing
+#
 if { $news_admin_p == 1 || $approval_policy eq "open" } { 
-
     set approval_user [ad_conn "user_id"]
     set approval_ip [ad_conn "peeraddr"]
     set approval_date [dt_sysdate]
     set live_revision_p "t"
-
 } else {
-    
     set approval_user [db_null]
     set approval_ip [db_null]
     set approval_date [db_null]
     set live_revision_p "f"
-
 }
 
-# RAL: This was missing and allows the user to "never expire" a news
-# item.
+# Allow the user to "never expire" a news item.
 if {$permanent_p == "t"} {
     set archive_date_ansi [db_null]
 } 
@@ -64,30 +61,27 @@
 # avoid any db weirdness with the "." in the variable name.
 set mime_type ${publish_body.format}
 
-# do insert: unfortunately the publish_body cannot be supplied through the PL/SQL function
-# we therefore have to do this in a second step 
 set news_id [db_exec_plsql create_news_item {}]
 
 #
-# RAL: For postgres, we need NOT store the data in a blob.  The
-# news item body is stored in the prior news__new call.
+# For postgres, the news # item body is stored in the prior news__new
+# call. The blob stuff is just needed for Oracle.
 #
 set content_add [db_map content_add]
 if {![string match $content_add ""]} {
     db_dml content_add {} -blobs  [list $publish_body]
 }
 
-#update RSS if it is enabled
-
+#
+# update RSS if it is enabled
+#
 if { !$news_admin_p } {
-    
     if { "open" ne [parameter::get -parameter ApprovalPolicy -default "wait"] } {
-	# case: user submitted news item, is returned to a Thank-you page
-	set title "[_ news.News_item_submitted]"
-	set context [list $title]
-	ad_return_template item-create-thankyou 
+        # case: user submitted news item, is returned to a Thank-you page
+        set title [_ news.News_item_submitted]
+        set context [list $title]
+        ad_return_template item-create-thankyou 
     }
-
 } else {    
     # case: administrator returned to index page
     ad_returnredirect ""
@@ -106,7 +100,7 @@
 
 # send out notifications
 if { $live_revision_p } {
-	news_do_notification $package_id $news_id
+    news_do_notification $package_id $news_id
 }
 
 ad_returnredirect ""