… | … | ||
---|---|---|---|
209 | } | 209 | } |
210 | 210 | ||
211 | sub do_n_dialog { | 211 | sub do_n_dialog { |
212 | my ($cb) = @_; | 212 | my ($cb) = @_; |
213 | 213 | ||
214 | my $w = new CFPlus::UI::FancyFrame | 214 | my $w = new CFPlus::UI::Toplevel |
215 | on_delete => sub { $_[0]->destroy; 1 }, | 215 | on_delete => sub { $_[0]->destroy; 1 }, |
216 | has_close_button => 1, | 216 | has_close_button => 1, |
217 | ; | 217 | ; |
218 | 218 | ||
219 | $w->add (my $vb = new CFPlus::UI::VBox x => "center", y => "center"); | 219 | $w->add (my $vb = new CFPlus::UI::VBox x => "center", y => "center"); |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |