pd/src desire.tk, 1.1.2.226, 1.1.2.227 desire.c, 1.1.2.79, 1.1.2.80 - Pd-cvs

11 Jun 2006


      Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6124
Modified Files:
      Tag: devel_0_39
    desire.tk desire.c 
Log Message:
small fix for accels command and reload
Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.226
retrieving revision 1.1.2.227
diff -C2 -d -r1.1.2.226 -r1.1.2.227
*** desire.tk	11 Jun 2006 16:56:58 -0000	1.1.2.226
--- desire.tk	11 Jun 2006 18:12:48 -0000	1.1.2.227
***************
*** 725,729 ****
    }
    #set accel [accel_munge $accel]
- 	#regsub -all %W $cmd $self cmd
    if {$accel != ""} {
    	if {![dict exists $accels $accel]} {
--- 725,728 ----
***************
*** 733,736 ****
--- 732,736 ----
    	}
    	}
+ 	regsub -all %W $cmd $self cmd
    if {[llength $e]==3} {
    	$menu add command -label $text -command $cmd \
Index: desire.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v
retrieving revision 1.1.2.79
retrieving revision 1.1.2.80
diff -C2 -d -r1.1.2.79 -r1.1.2.80
*** desire.c	21 May 2006 16:29:21 -0000	1.1.2.79
--- desire.c	11 Jun 2006 18:12:48 -0000	1.1.2.80
***************
*** 763,767 ****
              canvas_drawlines(x);
              if (x->gl_isgraph && x->gl_goprect) canvas_drawredrect(x, 1);
!             sys_mgui(x,"canvas_getscroll","");
          }
      } else {
--- 763,767 ----
              canvas_drawlines(x);
              if (x->gl_isgraph && x->gl_goprect) canvas_drawredrect(x, 1);
!             sys_mgui(x,"getscroll","");
          }
      } else {