[PD-cvs] pd/src desire.tk,1.1.2.600.2.267,1.1.2.600.2.268

[Mathieu Bouchard]

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

Modified Files:
      Tag: desiredata
	desire.tk 
Log Message:
fix Escape key in keyboard view


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.600.2.267
retrieving revision 1.1.2.600.2.268
diff -C2 -d -r1.1.2.600.2.267 -r1.1.2.600.2.268
*** desire.tk	2 Aug 2007 19:37:39 -0000	1.1.2.600.2.267
--- desire.tk	2 Aug 2007 20:07:54 -0000	1.1.2.600.2.268
***************
*** 8173,8177 ****
  
  set keyboard_layout {
! 	{1 " " 67 68 69 70 " " 71 72 73 74 " " 75 76 95 96}
  	{49 10 11 12 13 14 15 16 17 18 19 20 21 22}
  	{23 24 25 26 27 28 29 30 31 32 33 34 35 51}
--- 8173,8177 ----
  
  set keyboard_layout {
! 	{9 " " 67 68 69 70 " " 71 72 73 74 " " 75 76 95 96}
  	{49 10 11 12 13 14 15 16 17 18 19 20 21 22}
  	{23 24 25 26 27 28 29 30 31 32 33 34 35 51}
***************
*** 8182,8186 ****
  
  foreach {k v} {
! 	1 5
  	22 5
  	23 4 51 4
--- 8182,8186 ----
  
  foreach {k v} {
! 	9 5
  	22 5
  	23 4 51 4
***************
*** 8191,8195 ****
  
  proc namekey {i args} {foreach name $args {set ::keyboard_text_of($i) $name; incr i}}
! namekey 1 Esc
  namekey 67 F1 F2 F3 F4 F5 F6 F7 F8 F9 F10
  namekey 95 F11 F12
--- 8191,8195 ----
  
  proc namekey {i args} {foreach name $args {set ::keyboard_text_of($i) $name; incr i}}
! namekey 9 Esc
  namekey 67 F1 F2 F3 F4 F5 F6 F7 F8 F9 F10
  namekey 95 F11 F12