Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7780
Modified Files: Tag: desiredata desire.tk Log Message: added mouse wheel support in KeyboardDialog
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.600.2.374 retrieving revision 1.1.2.600.2.375 diff -C2 -d -r1.1.2.600.2.374 -r1.1.2.600.2.375 *** desire.tk 15 Aug 2007 16:47:10 -0000 1.1.2.600.2.374 --- desire.tk 15 Aug 2007 17:11:49 -0000 1.1.2.600.2.375 *************** *** 8472,8476 ****
set keyboard_layouts { ! { {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} --- 8472,8476 ----
set keyboard_layouts { ! { {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} *************** *** 8479,8491 **** {50 52 53 54 55 56 57 58 59 60 61 62} {37 115 64 65 113 116 117 109} ! } ! ! { {" " " " 98 " "} {100 " " 102} {" " " " 104 " "} {" "} ! {" " 1 2 3} ! } }
--- 8479,8491 ---- {50 52 53 54 55 56 57 58 59 60 61 62} {37 115 64 65 113 116 117 109} ! } { {" " " " 98 " "} {100 " " 102} {" " " " 104 " "} {" "} ! {" " " " 4 " "} ! {1 2 3} ! {" " " " 5 " "} ! } }
*************** *** 8497,8501 **** 50 8 62 8 37 4 115 4 64 4 65 24 113 4 116 4 117 4 109 4 ! 1 1 2 1 3 1 } {set keyboard_width_of($k) $v}
--- 8497,8501 ---- 50 8 62 8 37 4 115 4 64 4 65 24 113 4 116 4 117 4 109 4 ! 1 2 2 2 3 2 4 2 5 2 } {set keyboard_width_of($k) $v}
*************** *** 8523,8530 **** namekey 102 R namekey 104 D #mouse clicks - namekey 1 1 - namekey 2 2 - namekey 3 3
def KeyboardDialog init {history} { --- 8523,8528 ---- namekey 102 R namekey 104 D + namekey 1 1 2 3 4 5 #mouse clicks
def KeyboardDialog init {history} { *************** *** 8569,8573 **** } pack .$self.board.$name.$i -fill x ! if {$i==0} {pack [label .$self.board.$name.shim -image icon_empty]} incr i } --- 8567,8571 ---- } pack .$self.board.$name.$i -fill x ! if {$i==0} {pack [label .$self.board.$name.shim -image icon_empty] -fill x -expand yes} incr i }