Changeset 513


Ignore:
Timestamp:
May 2, 2012 4:09:26 PM (10 years ago)
Author:
toby
Message:

address double-click problem

Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/data.tcl

    r505 r513  
    551551              -orient horizontal ] -column 0 -row 1 -sticky ew
    552552    bind $box.1 <Double-Button-1> "getfilelist $box; displaylist"
     553    bind $box.1 <Control-Button-1> "getfilelist $box; displaylist"
    553554    bind $box.1 <Triple-Button-1> \
    554555            "$box.1 selection set 0 end; getfilelist $box; displaylist"
  • trunk/read.tcl

    r332 r513  
    33Reads a file in a variety of formats. Select the appropriate
    44file format and the select a file. Files can be read either
    5 by clicking the "Read" button or by double-clicking on the file.
     5by clicking the "Read" button or by clicking on the file.
    66
    77Refer to the HTML documentation for information about adding
     
    248248    grid [button $bx.c -command {$FilePane(command) [FilePaneGetFileList]} \
    249249            -text $button] -column 0 -row 4 -columnspan 2
    250     bind $bx.files <Double-Button-1> FilePaneDoubleClick
     250    bind $bx.files <ButtonRelease-1> FilePaneDoubleClick
    251251    bind $bx <KeyPress-Prior> "$bx.files yview scroll -1 page"
    252252    bind $bx <KeyPress-Next> "$bx.files yview scroll 1 page"
Note: See TracChangeset for help on using the changeset viewer.