Improve error trapping, actually make it work
This commit is contained in:
parent
9a2b390328
commit
af656c2e18
@ -862,6 +862,7 @@ ts method getkey {mode} {
|
||||
lappend keys $key
|
||||
}
|
||||
}
|
||||
} on error {} {
|
||||
} finally {
|
||||
catch {$fd close}
|
||||
}
|
||||
@ -881,6 +882,7 @@ ts method getkey {mode} {
|
||||
lappend keys $key
|
||||
}
|
||||
}
|
||||
} on error {} {
|
||||
} finally {
|
||||
catch {$fd close}
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user