There's somes '$' forgotten in automsg.tcl

Instead of passing $automessage and $new_state to ChangeMyState's
PostEvent, "automessage" and "new_state"

Please apply this, thanks :)



Yoda-BZH



PS: and what about my last patch to order the plugin list ?

--
Admin WestArena : http://www.westarena.net 28 - 29 - 30 avril 2006 à
Landerneau (29)
Admin AAG : http://www.2ag-fr.com

http://www.yoda-bzh.net
http://blog.yoda-bzh.net

o May the Force be with you
o Do it, or not, but there's no try
--- automsg.orig.tcl	2006-08-12 01:50:17.000000000 +0200
+++ automsg.tcl	2006-08-12 01:50:27.000000000 +0200
@@ -310,12 +310,12 @@
 
 	if { [info exists new_state] } {
 		::MSN::changeStatus $new_state
 
 		#PostEvent 'ChangeMyState' when the user changes his/her state
-		set evPar(automessage) automessage
-		set evPar(idx) new_state
+		set evPar(automessage) $automessage
+		set evPar(idx) $new_state
 		::plugins::PostEvent ChangeMyState evPar
 	} else {
 		status_log "ChCustomState where state didnt exist !!!" red
 	}
 
-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Amsn-devel mailing list
Amsn-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amsn-devel

Reply via email to