Tk Source Code

View Ticket
Login
2015-05-01
15:53 Closed ticket [4a0451f529]: tk_getOpenFile's return plus 5 other changes artifact: 76096f23d9 user: dgp
2015-03-19
21:36 Closed ticket [cd07dc4792]: tk_chooseDirectory tk_getOpenFile tk_getSaveFile on Windows 7ff return non-empty on cancel plus 6 other changes artifact: 4a2d3da158 user: jan.nijtmans
2014-12-06
11:13 Closed ticket [2a18f713cc]: tk_getOpenFile returns an after id when cancel is selected. plus 5 other changes artifact: d7b90ebf27 user: apnadkarni
2014-12-04
14:11 Ticket [4a0451f529] tk_getOpenFile's return status still Open with 3 other changes artifact: b8f7d03650 user: apnadkarni
2014-12-02
14:14 Ticket [4a0451f529]: 3 changes artifact: 5ed67d226c user: apnadkarni
14:03 New ticket [4a0451f529]. artifact: 8621626aa7 user: anonymous

Ticket UUID: 4a0451f5291b3c9168cc560747dae9264e1d2ef6
Title: tk_getOpenFile's return
Type: Bug Version: 8.6.3
Submitter: anonymous Created on: 2014-12-02 14:03:07
Subsystem: 37. [tk_get*File] Assigned To: nobody
Priority: 5 Medium Severity: Minor
Status: Closed Last Modified: 2015-05-01 15:53:49
Resolution: Fixed Closed By: dgp
    Closed on: 2015-05-01 15:53:49
Description:
On Windows 7 with tcl/tk 8.6.3

If I run this as a script :

package require Tk

proc Every {} {
   
    set afterId [after 1000 Every]
}

Every

set response [tk_getOpenFile]

puts $response


In the widget "Open file" created in tk, if I cancel the operation (file's choice), the variable response returns the after's identifier instead of the empty string as stated in the doc.

Sorry for my poor english
Thanks

Jean-Baptiste
User Comments: apnadkarni added on 2014-12-04 14:11:09:

Fixed in trunk check-in [4b723acb3e15fcac2d2cffccbc0126d06156e1f1|4b723acb3e]


apnadkarni added on 2014-12-02 14:14:50:
I introduced the bug in 8.6.3. Needs a Tcl_ResetResult in the Cancel case. Looking at it now

/Ashok