Make affiliates more prominent.

This commit is contained in:
Sergiotarxz 2024-11-12 11:25:42 +01:00
parent 193a68e83a
commit ce30f1d251
2 changed files with 9 additions and 1 deletions

View File

@ -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 ] );
} }

View File

@ -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',