Bug ID | 1083828 |
---|---|
Summary | tcl/tk wish crashes |
Classification | openSUSE |
Product | openSUSE Distribution |
Version | Leap 42.3 |
Hardware | Other |
OS | Other |
Status | NEW |
Severity | Normal |
Priority | P5 - None |
Component | Basesystem |
Assignee | bnc-team-screening@forge.provo.novell.com |
Reporter | reinhard.hennig@freenet.de |
QA Contact | qa-bugs@suse.de |
Found By | --- |
Blocker | --- |
Created attachment 762585 [details]
A Screenshot of thhe snippet being startet from the commandline
wish crashes with sigsegv (11) when including Iwidgets
(iwidgets::extfileselectionbox)
actual version of tcl and tk (8.6.7) lead to the error: using older versions
8.6.1 it works fine:
Here is sample code:
#!/bin/bash
# restart using wish \
exec wish "$0" -- "$@"
# initializing
set DOCDIR $env(HOME)
proc ChooseWin { dir } {
toplevel .choosewin
iwidgets::extfileselectionbox .choosewin.fsb -width 8i -height 6i \
-dirslabel "Directories" \
-fileslabel "Files" \
-selectionlabel "Please select" \
-directory $dir \
-selectforeground white \
-selectbackground red \
-highlightthickness 2 \
-selectfilecommand {
.choosewin.fsb configure -selectionlabel "your choice"
}
pack .choosewin.fsb -fill both -expand yes
}
# ------------------------------------- Main
-----------------------------------
package require Iwidgets
. configure -bg grey
button .button -text "push me 4 search" \
-fg black -bg grey80 \
-command {
if { ![winfo exists .choosewin ] } {
ChooseWin $DOCDIR
}
}
pack .button
##end
pushing the button normally opens a fileselectiondialog in a new window. Using
actual versions of tk and tcl on OpenSuSE 42.2 and OpenSuSE 42.3 are causing
crashes (wish collapses at signal 11). I've also done strace -fp on the wish
procid showing SigSegV. I think it's a bug that should be reported. It happens
on OpenSuSE 42.2 and OpenSuSE 42.3.