Skip Menu |

This queue is for tickets about the Tk CPAN distribution.

Report information
The Basics
Id: 5905
Status: stalled
Priority: 0/
Queue: Tk

People
Owner: Nobody in particular
Requestors: chris [...] revovethisriverslime.com
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: 804.026
Fixed in: (no value)



Subject: Tk cann access files or folder with ascii-8 characters
On Windows Perl/Tk 804 does not work with folder or files containing non-ascii-7 characters such as ther french accent acute. It seems that Perl hanlds it ok but Tk doesn't. This can be easily tested by creating a folder with a é. Then just try selecting a file in the folder using getOpenFile and then open the file. The open will fail indicating that the file is not found. This causes problems for French users who are using perlapp pdk from Activestate who use the defaault login account which is Propriétaire. Folders are created using the name Propriétaire containing various Tk files such as .xpm, .gif, etc files. When a Tk .pm such as BrowseEntry tries to open the downarrow file, for example, the script stops with a message: couldn't read bitmap file "": No such file or directoryerror reading bitmap file "" at /PerlApp/Tk/Widget.pm line 205. at /PerlApp/Tk/Widget.pm line 203
On Sat Apr 03 21:43:55 2004, guest wrote: Show quoted text
> On Windows Perl/Tk 804 does not work with folder or files containing > non-ascii-7 characters such as ther french accent acute. > > It seems that Perl hanlds it ok but Tk doesn't. > > This can be easily tested by creating a folder with a é. Then just > try selecting a file in the folder using getOpenFile and then open > the file. The open will fail indicating that the file is not > found. > > This causes problems for French users who are using perlapp pdk from > Activestate who use the defaault login account which is > Propriétaire. Folders are created using the name Propriétaire > containing various Tk files such as .xpm, .gif, etc files. When a > Tk .pm such as BrowseEntry tries to open the downarrow file, for > example, the script stops with a message: > couldn't read bitmap file "": No such file or directoryerror reading > bitmap > file "" at /PerlApp/Tk/Widget.pm line 205. > at /PerlApp/Tk/Widget.pm line 203 >
There are two workarounds: * The file from getOpenFile has probably hte utf8 flag set. You may convert it back to iso-8859-1 (or windows-125x) using Encode: $file = encode("Windows-1252", $file); * You can try to use the alternative file dialog Tk::FBox, just by setting it as the default file dialog: use Tk::FBox 'as_default'; It seems that this dialog handles your case better. Sorry, but there won't be a "real" solution soon, because I believe we have first to wait until perl have decent unicode support for filesystems. Which may happen in 5.12 or so. Regards, Slaven