… | … | ||
---|---|---|---|
12 | 12 | ||
13 | my $self = $class->SUPER::new ( | 13 | my $self = $class->SUPER::new ( |
14 | border_bg => [1, 1, 1, 1], | 14 | border_bg => [1, 1, 1, 1], |
15 | x => "max", | 15 | x => "max", |
16 | y => 0, | 16 | y => 0, |
17 | force_w => $::WIDTH * 0.4, | ||
18 | force_h => $::HEIGHT * 0.5, | ||
19 | child => (my $nb = DC::UI::Notebook->new (expand => 1)), | 17 | child => (my $nb = DC::UI::Notebook->new (expand => 1)), |
20 | @_, | 18 | @_, |
21 | ); | 19 | ); |
22 | 20 | ||
23 | $self->{notebook} = $nb; | 21 | $self->{notebook} = $nb; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |