# HG changeset patch
# User Ethan Blanton <elb@pidgin.im>
# Date 1150429754 0
# Node ID 6a6c8e70411ca6c0b61a709f9d41164f5a3cf891
# Parent  f2171c7feeda74cc6220eaf91006587c8b1c366c
[gaim-migrate @ 16269]
Fix some spacing bugs and a stupid copy-and-paste error

diff -r f2171c7feeda -r 6a6c8e70411c plugins/tcl/tcl.c
--- a/plugins/tcl/tcl.c	Fri Jun 16 03:42:34 2006 +0000
+++ b/plugins/tcl/tcl.c	Fri Jun 16 03:49:14 2006 +0000
@@ -135,8 +135,8 @@
 	Tcl_CreateObjCommand(interp, "::gaim::presence", tcl_cmd_presence, (ClientData)NULL, NULL);
 	Tcl_CreateObjCommand(interp, "::gaim::send_im", tcl_cmd_send_im, (ClientData)NULL, NULL);
 	Tcl_CreateObjCommand(interp, "::gaim::signal", tcl_cmd_signal, (ClientData)NULL, NULL);
-	Tcl_CreateObjCommand(interp, "::gaim::status", tcl_cmd_status_type, (ClientData)NULL, NULL);
-	Tcl_CreateObjCommand(interp, "::gaim::status_attr", tcl_cmd_status_type, (ClientData)NULL, NULL);
+	Tcl_CreateObjCommand(interp, "::gaim::status", tcl_cmd_status, (ClientData)NULL, NULL);
+	Tcl_CreateObjCommand(interp, "::gaim::status_attr", tcl_cmd_status_attr, (ClientData)NULL, NULL);
 	Tcl_CreateObjCommand(interp, "::gaim::status_type", tcl_cmd_status_type, (ClientData)NULL, NULL);
 	Tcl_CreateObjCommand(interp, "::gaim::unload", tcl_cmd_unload, (ClientData)NULL, NULL);
 
diff -r f2171c7feeda -r 6a6c8e70411c plugins/tcl/tcl_ref.c
--- a/plugins/tcl/tcl_ref.c	Fri Jun 16 03:42:34 2006 +0000
+++ b/plugins/tcl/tcl_ref.c	Fri Jun 16 03:49:14 2006 +0000
@@ -60,7 +60,7 @@
 		if (interp) {
 			Tcl_Obj *error = Tcl_NewStringObj("Bad Gaim reference type: expected ", -1);
 			Tcl_AppendToObj(error, gaim_stringref_value(type), -1);
-			Tcl_AppendToObj(error, "but got ", -1);
+			Tcl_AppendToObj(error, " but got ", -1);
 			Tcl_AppendToObj(error, gaim_stringref_value(OBJ_REF_TYPE(obj)), -1);
 			Tcl_SetObjResult(interp, error);
 		}