Index: openacs-4/packages/trackback/tcl/trackback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/trackback/tcl/trackback-procs.tcl,v
diff -u -N -r1.4 -r1.4.2.1
--- openacs-4/packages/trackback/tcl/trackback-procs.tcl	12 Jan 2004 13:38:15 -0000	1.4
+++ openacs-4/packages/trackback/tcl/trackback-procs.tcl	25 Mar 2004 18:36:06 -0000	1.4.2.1
@@ -176,13 +176,13 @@
 	#must be POST
 
 	set form_vars [export_vars -url { url }]
-	if {![empty_string_p excerpt]} {
+	if {![empty_string_p $excerpt]} {
 	    ns_set put $query_set excerpt $excerpt
 	}
-	if {![empty_string_p title]} {
+	if {![empty_string_p $title]} {
 	    ns_set put $query_set title $title
 	}
-	if {![empty_string_p blog_name]} {
+	if {![empty_string_p $blog_name]} {
 	    ns_set put $query_set blog_name $blog_name
 	}