804.036-2 breaks font selection
| Task Info (Flyspray) | |
|---|---|
| Opened By | Steven Winikoff (smw) |
| Task ID | 70951 |
| Type | Bug Report |
| Project | Arch Linux |
| Category | Packages: Extra |
| Version | None |
| OS | All |
| Opened | 2021-05-19 22:20:22 UTC |
| Status | Assigned |
| Assignee | Felix Yan (felixonmars) |
Details
Description: Perl/Tk scripts running with perl-tk-804.036-2 are unable to select font faces. The same script works fine with 804.036-1
Additional info:
- package version(s) perl-tk-804.036-2
Steps to reproduce:
Run any Perl/Tk script which tries to select a font face. The selected face should be displayed, but isn't, as in the two attached screen captures from this sample script:
#!/usr/bin/perl
use Tk;
my $mw = MainWindow->new(-title => 'Font Example'); my $font1 = 'Mono 12'; my $font2 = '{Monotype Sorts} 12'; my $text = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz 0123456789'; my $t1 = $mw->Message(-text=>$text , -font=>$font1, -width=>800); $t1->pack(); my $t2 = $mw->Message(-text=>$text , -font=>$font2, -width=>800); $t2->pack();
MainLoop;
