… | |
… | |
457 | my ($cb) = @_; |
457 | my ($cb) = @_; |
458 | |
458 | |
459 | my $w = new CFClient::UI::FancyFrame |
459 | my $w = new CFClient::UI::FancyFrame |
460 | title => "Bind Action", |
460 | title => "Bind Action", |
461 | x => "center", |
461 | x => "center", |
462 | y => "center"; |
462 | y => "center", |
|
|
463 | z => 1000; |
463 | |
464 | |
464 | $w->add (my $vb = new CFClient::UI::VBox); |
465 | $w->add (my $vb = new CFClient::UI::VBox); |
465 | $vb->add (new CFClient::UI::Label |
466 | $vb->add (new CFClient::UI::Label |
466 | text => "Press a modifier (CTRL, ALT and/or SHIFT) and a key." |
467 | text => "Press a modifier (CTRL, ALT and/or SHIFT) and a key." |
467 | ."You can only bind 0-9 and F1-F15 without modifiers." |
468 | ."You can only bind 0-9 and F1-F15 without modifiers." |