[PD-cvs] SF.net SVN: pure-data:[10177] branches/pd-extended/v0-40/externals/bbogart/ entry/entry.c
eighthave at users.sourceforge.net
eighthave at users.sourceforge.net
Fri Jul 18 21:33:22 CEST 2008
Revision: 10177
http://pure-data.svn.sourceforge.net/pure-data/?rev=10177&view=rev
Author: eighthave
Date: 2008-07-18 19:33:21 +0000 (Fri, 18 Jul 2008)
Log Message:
-----------
removed extraneous post()s and fixed entry_append() so it works, it was trying to add text to the canvas rather than the text widget
Modified Paths:
--------------
branches/pd-extended/v0-40/externals/bbogart/entry/entry.c
Modified: branches/pd-extended/v0-40/externals/bbogart/entry/entry.c
===================================================================
--- branches/pd-extended/v0-40/externals/bbogart/entry/entry.c 2008-07-18 18:34:58 UTC (rev 10176)
+++ branches/pd-extended/v0-40/externals/bbogart/entry/entry.c 2008-07-18 19:33:21 UTC (rev 10177)
@@ -49,6 +49,7 @@
#define TOTAL_OUTLETS 2
#define DEBUG(x)
+//#define DEBUG(x) x
typedef struct _entry
{
@@ -148,7 +149,6 @@
sprintf(buf,"%s.window%lx", x->canvas_id, (long unsigned int)x);
x->window_tag = getbytes(strlen(buf));
strcpy(x->window_tag, buf); /* Tk ID for the resizing "window" */
- post("");
sprintf(buf,"%s.handle%lx", x->canvas_id, (long unsigned int)x);
x->handle_id = getbytes(strlen(buf));
@@ -166,7 +166,7 @@
static int calculate_onset(t_entry *x, t_glist *glist,
int current_iolet, int total_iolets)
{
- post("calculate_onset");
+ DEBUG(post("calculate_onset"););
return(text_xpix(&x->x_obj, glist) + (x->x_width - IOWIDTH) \
* current_iolet / (total_iolets == 1 ? 1 : total_iolets - 1));
}
@@ -476,7 +476,7 @@
}
sys_vgui("append ::%s::list \" \"\n", x->tcl_namespace);
sys_vgui("%s insert end $::%s::list ; unset ::%s::list \n",
- x->canvas_id, x->tcl_namespace, x->tcl_namespace );
+ x->text_id, x->tcl_namespace, x->tcl_namespace );
sys_vgui("%s yview end-2char \n", x->text_id );
}
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
More information about the Pd-cvs
mailing list