Index: openacs-4/packages/xml-rpc/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xml-rpc/www/index.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/xml-rpc/www/index.tcl	26 Nov 2003 02:59:14 -0000	1.1
+++ openacs-4/packages/xml-rpc/www/index.tcl	10 Apr 2008 15:29:35 -0000	1.2
@@ -9,7 +9,7 @@
 } {
 }
 
-if {[string equal [ns_conn method] POST]} {
+if {[ns_conn method] eq "POST"} {
     set content [xmlrpc::get_content]
     ns_return 200 text/xml [xmlrpc::invoke $content]
     return