Index: openacs-4/packages/news/www/admin/revision-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/admin/revision-add.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/news/www/admin/revision-add.tcl	15 Oct 2001 13:41:03 -0000	1.2
+++ openacs-4/packages/news/www/admin/revision-add.tcl	16 Oct 2001 10:10:19 -0000	1.3
@@ -60,7 +60,9 @@
 # workaround to get blobs with >4000 chars into a var, content.blob_to_string fails! 
 # when this'll work, you get publish_body by selecting 'publish_body' directly from above view
 #
-if {![string match [db_type] "postgresql"]} {
+set get_content [db_map get_content]
+
+if {![string match $get_content ""]} {
     set publish_body [db_string get_content "select  content
     from    cr_revisions
     where   revision_id = :revision_id"]