diff --git a/lib/Exd/Gui.pm b/lib/Exd/Gui.pm index 0ada770..13417c1 100644 --- a/lib/Exd/Gui.pm +++ b/lib/Exd/Gui.pm @@ -128,6 +128,7 @@ sub start($self) { $self->_activate(undef); } ); + print Data::Dumper::Dumper $app; $app->run( [ $0, @ARGV ] ); } diff --git a/lib/Exd/Gui/Instance.pm b/lib/Exd/Gui/Instance.pm index 7aaa0ee..14fc88b 100644 --- a/lib/Exd/Gui/Instance.pm +++ b/lib/Exd/Gui/Instance.pm @@ -129,6 +129,12 @@ sub start( $self, $exd_file ) { my $select_printer = Gtk4::Button->new_with_label('Select Printer'); my $open_gallery = Gtk4::Button->new_with_label('Open image 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( 'clicked', sub { @@ -187,6 +193,7 @@ sub start( $self, $exd_file ) { $box_buttons->append($select_printer); $box_buttons->append($open_gallery); $box_buttons->append($edit_fonts); + $box_buttons->append($printers_and_supplies); $self->_populate_editor_and_preview($box_vertical); $box_vertical->append($box_buttons); 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 as', 'app.save-as.' . $self->instance_id ); $help_menu->append( - 'Recommended printers and supplies', + 'Buy printers and supplies', 'app.good-printers.' . $self->instance_id ); $help_menu->append( 'About and contact',