[PD-cvs] pd/src g_canvas.c, 1.18.6.1, 1.18.6.2 g_editor.c, 1.20.6.2, 1.20.6.3 g_text.c, 1.15.6.2, 1.15.6.3

[Hans-Christoph Steiner]

Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19812

Modified Files:
      Tag: branch-v0-40-extended
	g_canvas.c g_editor.c g_text.c 
Log Message:
in order to make sure that the cords are always on top, tag them all, and send a raise whenever a box is created

Index: g_text.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/g_text.c,v
retrieving revision 1.15.6.2
retrieving revision 1.15.6.3
diff -C2 -d -r1.15.6.2 -r1.15.6.3
*** g_text.c	6 Nov 2007 02:28:12 -0000	1.15.6.2
--- g_text.c	9 Nov 2007 06:28:44 -0000	1.15.6.3
***************
*** 1253,1256 ****
--- 1253,1257 ----
          }
          if (firsttime)
+         {
              sys_vgui(".x%lx.c create polygon %d %d %d %d %d %d %d %d %d %d \
                        -dash %s -outline %s -fill $obj_box_fill -tags %sR\n", 
***************
*** 1258,1261 ****
--- 1259,1264 ----
                       x1, y1,  x2, y1,  x2, y2,  x1, y2,  x1, y1,  
                       pattern, outline, tag);
+             sys_vgui(".x%lx.c raise all_cords\n", glist_getcanvas(glist));
+         }
          else
          {

Index: g_editor.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/g_editor.c,v
retrieving revision 1.20.6.2
retrieving revision 1.20.6.3
diff -C2 -d -r1.20.6.2 -r1.20.6.3
*** g_editor.c	6 Nov 2007 02:28:12 -0000	1.20.6.2
--- g_editor.c	9 Nov 2007 06:28:44 -0000	1.20.6.3
***************
*** 1342,1346 ****
                              + IOMIDDLE;
                  ly2 = y21;
!                 sys_vgui(".x%lx.c create line %d %d %d %d -fill %s -width %d -tags l%lx\n",
                      glist_getcanvas(x),
                          lx1, ly1, lx2, ly2,
--- 1342,1346 ----
                              + IOMIDDLE;
                  ly2 = y21;
!                 sys_vgui(".x%lx.c create line %d %d %d %d -fill %s -width %d -tags {l%lx all_cords}\n",
                      glist_getcanvas(x),
                          lx1, ly1, lx2, ly2,

Index: g_canvas.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/g_canvas.c,v
retrieving revision 1.18.6.1
retrieving revision 1.18.6.2
diff -C2 -d -r1.18.6.1 -r1.18.6.2
*** g_canvas.c	4 Nov 2007 18:00:20 -0000	1.18.6.1
--- g_canvas.c	9 Nov 2007 06:28:44 -0000	1.18.6.2
***************
*** 905,912 ****
      {
          issignal = (outlet_getsymbol(t.tr_outlet) == &s_signal ? 1 : 0);
!         sys_vgui(".x%lx.c create line %d %d %d %d -width %d -fill %s -tags l%lx\n",
                   glist_getcanvas(x), t.tr_lx1, t.tr_ly1, t.tr_lx2, t.tr_ly2, 
                   (issignal ? 2:1), (issignal ? "$signal_cord" : "$msg_cord"),
!                                 oc);
      }
  }
--- 905,913 ----
      {
          issignal = (outlet_getsymbol(t.tr_outlet) == &s_signal ? 1 : 0);
!         sys_vgui(".x%lx.c create line %d %d %d %d -width %d -fill %s \
! -tags {l%lx all_cords}\n",
                   glist_getcanvas(x), t.tr_lx1, t.tr_ly1, t.tr_lx2, t.tr_ly2, 
                   (issignal ? 2:1), (issignal ? "$signal_cord" : "$msg_cord"),
!                  oc);
      }
  }