[PD-cvs] externals/bbogart/entry entry.c,1.19,1.20

[Hans-Christoph Steiner]

Update of /cvsroot/pure-data/externals/bbogart/entry
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11351

Modified Files:
	entry.c 
Log Message:
made scrollbar off by default; removed seemingly extraneous Tcl focus statement in entry_bang_output()

Index: entry.c
===================================================================
RCS file: /cvsroot/pure-data/externals/bbogart/entry/entry.c,v
retrieving revision 1.19
retrieving revision 1.20
diff -C2 -d -r1.19 -r1.20
*** entry.c	28 Oct 2007 05:53:09 -0000	1.19
--- entry.c	29 Oct 2007 03:23:07 -0000	1.20
***************
*** 257,262 ****
      DEBUG(post("scrollbar .x%x.c.s%x.scrollbar -command {.x%x.c.s%x.text yview} \n",canvas, x, canvas, x););
      sys_vgui("scrollbar .x%x.c.s%x.scrollbar -command {.x%x.c.s%x.text yview} \n",canvas, x ,canvas, x);
-     DEBUG(post("pack .x%x.c.s%x.scrollbar -side right -fill y \n",canvas, x););
-     sys_vgui("pack .x%x.c.s%x.scrollbar -side right -fill y \n",canvas, x);
      DEBUG(post("pack .x%x.c.s%x.text -side left -fill both -expand 1 \n",canvas, x););
      sys_vgui("pack .x%x.c.s%x.text -side left -fill both -expand 1 \n",canvas, x);
--- 257,260 ----
***************
*** 489,497 ****
                [.x%x.c.s%x.text get 0.0 end]] \\;]\n", 
               x->x_receive_name->s_name, x->x_glist, x);
- 
-     DEBUG(post("bind .x%x.c.s%x.text <Leave> {focus [winfo parent .x%x.c.s%x]} \n", 
-                x->x_glist, x, x->x_glist, x););
-     sys_vgui("bind .x%x.c.s%x.text <Leave> {focus [winfo parent .x%x.c.s%x]} \n", 
-              x->x_glist, x, x->x_glist, x);
  }
  
--- 487,490 ----
***************
*** 551,555 ****
      binbuf_addv(b, "ssiisiiss", gensym("#X"),gensym("obj"),
                  x->x_obj.te_xpix, x->x_obj.te_ypix, 
!                 gensym("entry"), x->x_width, x->x_height, x->x_bgcolour, x->x_fgcolour);
      binbuf_addv(b, ";");
  }
--- 544,549 ----
      binbuf_addv(b, "ssiisiiss", gensym("#X"),gensym("obj"),
                  x->x_obj.te_xpix, x->x_obj.te_ypix, 
!                 gensym("entry"), x->x_width, x->x_height, 
!                 x->x_bgcolour, x->x_fgcolour);
      binbuf_addv(b, ";");
  }
***************
*** 653,662 ****
      t_entry *x = (t_entry *)pd_new(entry_class);
      char buf[MAXPDSTRING];
! 
      x->x_height = 1;
      x->x_font_face = gensym("helvetica");
      x->x_font_size = 10;
      x->x_font_weight = gensym("normal");
!     x->x_have_scrollbar = 1;
  	
  	if (argc < 4)
--- 647,656 ----
      t_entry *x = (t_entry *)pd_new(entry_class);
      char buf[MAXPDSTRING];
!     
      x->x_height = 1;
      x->x_font_face = gensym("helvetica");
      x->x_font_size = 10;
      x->x_font_weight = gensym("normal");
!     x->x_have_scrollbar = 0;
  	
  	if (argc < 4)