Skip Menu |
 

This queue is for tickets about the Curses-UI CPAN distribution.

Report information
The Basics
Id: 125327
Status: new
Priority: 0/
Queue: Curses-UI

People
Owner: Nobody in particular
Requestors: PRIVI [...] cpan.org
Cc:
AdminCc:

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



Subject: onfocus event is not triggerd on modalfocus
Download (untitled) / with headers
text/plain 679b
root@wawicwdev:/opt/server# diff -U 5 /usr/local/share/perl/5.24.1/Curses/UI/Widget.pm.org /usr/local/share/perl/5.24.1/Curses/UI/Widget.pm --- /usr/local/share/perl/5.24.1/Curses/UI/Widget.pm.org 2018-05-16 19:39:15.046357165 +0200 +++ /usr/local/share/perl/5.24.1/Curses/UI/Widget.pm 2018-05-16 19:39:17.246393160 +0200 @@ -506,10 +506,12 @@ # "Fake" focus for this object. $this->{-has_modal_focus} = 1; $this->focus; $this->draw; + $this->run_event('-onfocus'); + # Event loop ((too?) much like Curses::UI->mainloop) while ( $this->{-has_modal_focus} ) { $this->root->do_one_event($this); } root@wawicwdev:/opt/server#


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.