Index: xotcl/library/actiweb/HttpPlace.xotcl
===================================================================
diff -u -rad8a63234e44a8788efede276e811051ab891fbe -rbb3c756fb47517596b9dbcb4e580aa1212827b41
--- xotcl/library/actiweb/HttpPlace.xotcl	(.../HttpPlace.xotcl)	(revision ad8a63234e44a8788efede276e811051ab891fbe)
+++ xotcl/library/actiweb/HttpPlace.xotcl	(.../HttpPlace.xotcl)	(revision bb3c756fb47517596b9dbcb4e580aa1212827b41)
@@ -1,4 +1,4 @@
-# $Id: HttpPlace.xotcl,v 1.3 2005/09/09 21:09:01 neumann Exp $
+# $Id: HttpPlace.xotcl,v 1.4 2006/09/14 06:36:02 neumann Exp $
 
 package provide xotcl::actiweb::httpPlace 0.8
 
@@ -173,7 +173,7 @@
     }
     Place::HttpdWrk instproc respond-GET {} {
 	my instvar fileName resourceName place
-	if {$resourceName == ""} {
+	if {$resourceName eq ""} {
 	    my sendMsg [$place default] text/html  ;# kind of index.html
 	} elseif {[my parseParams obj method arguments $resourceName]} {
 	    if {![my isobject $obj] && [file readable $fileName]} {
@@ -211,12 +211,12 @@
 	my instvar resourceName place data
 	#my showCall
 	
-	if {$resourceName != ""} {
+	if {$resourceName ne ""} {
 	    if {[my parseParams obj m a $resourceName]} {
 		set obj [string trimleft $obj :]
 		set AMgr ${place}::agentMgr
 
-		if {[info commands $obj] == "" &&
+		if {[info commands $obj] eq "" &&
 		    ![$AMgr info agents $obj]} {
 		    #puts stderr "Receiving to put --------------------------------$obj  $data"
 		    set AI [$AMgr parseData $obj $data]