Make affiliates more prominent.
This commit is contained in:
parent
193a68e83a
commit
ce30f1d251
@ -128,6 +128,7 @@ sub start($self) {
|
|||||||
$self->_activate(undef);
|
$self->_activate(undef);
|
||||||
}
|
}
|
||||||
);
|
);
|
||||||
|
print Data::Dumper::Dumper $app;
|
||||||
$app->run( [ $0, @ARGV ] );
|
$app->run( [ $0, @ARGV ] );
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -129,6 +129,12 @@ sub start( $self, $exd_file ) {
|
|||||||
my $select_printer = Gtk4::Button->new_with_label('Select Printer');
|
my $select_printer = Gtk4::Button->new_with_label('Select Printer');
|
||||||
my $open_gallery = Gtk4::Button->new_with_label('Open image gallery');
|
my $open_gallery = Gtk4::Button->new_with_label('Open image gallery');
|
||||||
my $edit_fonts = Gtk4::Button->new_with_label('Open font gallery');
|
my $edit_fonts = Gtk4::Button->new_with_label('Open font gallery');
|
||||||
|
my $printers_and_supplies = Gtk4::Button->new_with_label('Buy printers and supplies');
|
||||||
|
$printers_and_supplies->signal_connect(
|
||||||
|
clicked => sub {
|
||||||
|
$self->_show_recommended_printers;
|
||||||
|
}
|
||||||
|
);
|
||||||
$open_gallery->signal_connect(
|
$open_gallery->signal_connect(
|
||||||
'clicked',
|
'clicked',
|
||||||
sub {
|
sub {
|
||||||
@ -187,6 +193,7 @@ sub start( $self, $exd_file ) {
|
|||||||
$box_buttons->append($select_printer);
|
$box_buttons->append($select_printer);
|
||||||
$box_buttons->append($open_gallery);
|
$box_buttons->append($open_gallery);
|
||||||
$box_buttons->append($edit_fonts);
|
$box_buttons->append($edit_fonts);
|
||||||
|
$box_buttons->append($printers_and_supplies);
|
||||||
$self->_populate_editor_and_preview($box_vertical);
|
$self->_populate_editor_and_preview($box_vertical);
|
||||||
$box_vertical->append($box_buttons);
|
$box_vertical->append($box_buttons);
|
||||||
my $execute_log_window = Gtk4::ScrolledWindow->new;
|
my $execute_log_window = Gtk4::ScrolledWindow->new;
|
||||||
@ -439,7 +446,7 @@ sub _create_popover_menu( $self, $box ) {
|
|||||||
$file_menu->append( 'Save', 'app.save.' . $self->instance_id );
|
$file_menu->append( 'Save', 'app.save.' . $self->instance_id );
|
||||||
$file_menu->append( 'Save as', 'app.save-as.' . $self->instance_id );
|
$file_menu->append( 'Save as', 'app.save-as.' . $self->instance_id );
|
||||||
$help_menu->append(
|
$help_menu->append(
|
||||||
'Recommended printers and supplies',
|
'Buy printers and supplies',
|
||||||
'app.good-printers.' . $self->instance_id
|
'app.good-printers.' . $self->instance_id
|
||||||
);
|
);
|
||||||
$help_menu->append( 'About and contact',
|
$help_menu->append( 'About and contact',
|
||||||
|
Loading…
Reference in New Issue
Block a user