Index: openacs-4/packages/lars-blogger/tcl/entry-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/entry-procs.tcl,v
diff -u -N -r1.15 -r1.16
--- openacs-4/packages/lars-blogger/tcl/entry-procs.tcl	14 Dec 2003 11:10:44 -0000	1.15
+++ openacs-4/packages/lars-blogger/tcl/entry-procs.tcl	28 Dec 2003 14:10:21 -0000	1.16
@@ -81,7 +81,7 @@
     db_dml update_entry {}
             
     # Is this a publish?
-    if { [template::util::is_true $draft_p "t"] && ![template::util::is_true $entry(draft_p)] } {
+    if { [template::util::is_true $draft_p] && ![template::util::is_true $entry(draft_p)] } {
 	lars_blogger::entry::publish -entry_id $entry_id -package_id $entry(package_id)
     }