Hello,
Before, this application was working fine ! I am in Fedora 10 last update (before means ~ 2 weeks !!) Now, the file name is not anymore transfered and it never live the widget ! I am also experiencing problem with JFileDialog
#!/usr/bin/perl -w
use Tk ; use strict ;
my $types = [ ['Text Files', ['.txt', '.text']], ['TCL Scripts', '.tcl' ], ['C Source Files', '.c', 'TEXT'], ['GIF Files', '.gif', ], ['GIF Files', '', 'GIFF'], ['All Files', '*', ], ];
my $main = MainWindow -> new () ;
my $filename = $main -> getOpenFile (-filetypes => $types) ;
if ($filename ne "") { # Open the file ... print $filename ; }