# HG changeset patch
# User Ethan Blanton <elb@pidgin.im>
# Date 1172373757 0
# Node ID 43c7071878de09f2da4e200faaad1eecb323dd55
# Parent  31a6bfedf7bed63601975ccee4ff599a299d3ee8
Missed one line from Dossy's patches -- binding the actual savedstatus command.

diff -r 31a6bfedf7be -r 43c7071878de libpurple/plugins/tcl/tcl.c
--- a/libpurple/plugins/tcl/tcl.c	Sun Feb 25 02:48:52 2007 +0000
+++ b/libpurple/plugins/tcl/tcl.c	Sun Feb 25 03:22:37 2007 +0000
@@ -138,6 +138,7 @@
 	Tcl_CreateObjCommand(interp, "::gaim::prefs", tcl_cmd_prefs, (ClientData)NULL, NULL);
 	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::savedstatus", tcl_cmd_savedstatus, (ClientData)NULL, NULL);
 	Tcl_CreateObjCommand(interp, "::gaim::signal", tcl_cmd_signal, (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);