Display current version in GUI
This commit is contained in:
parent
60f6ce363e
commit
d47a7bebbc
@ -3,6 +3,8 @@ package Slic3r;
|
|||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
|
||||||
|
our $VERSION = "0.0.5";
|
||||||
|
|
||||||
our $debug = 0;
|
our $debug = 0;
|
||||||
sub debugf {
|
sub debugf {
|
||||||
printf @_ if $debug;
|
printf @_ if $debug;
|
||||||
|
@ -97,7 +97,7 @@ sub new {
|
|||||||
$buttons_sizer->Add($load_button, 0);
|
$buttons_sizer->Add($load_button, 0);
|
||||||
EVT_BUTTON($self, $load_button, \&load_config);
|
EVT_BUTTON($self, $load_button, \&load_config);
|
||||||
|
|
||||||
my $text = Wx::StaticText->new($self, -1, "Remember to check for updates at http://slic3r.org/", Wx::wxDefaultPosition, Wx::wxDefaultSize, wxALIGN_RIGHT);
|
my $text = Wx::StaticText->new($self, -1, "Remember to check for updates at http://slic3r.org/\nVersion: $Slic3r::VERSION", Wx::wxDefaultPosition, Wx::wxDefaultSize, wxALIGN_RIGHT);
|
||||||
my $font = Wx::Font->new(10, wxDEFAULT, wxNORMAL, wxNORMAL);
|
my $font = Wx::Font->new(10, wxDEFAULT, wxNORMAL, wxNORMAL);
|
||||||
$text->SetFont($font);
|
$text->SetFont($font);
|
||||||
$buttons_sizer->Add($text, 1, wxEXPAND | wxALIGN_RIGHT);
|
$buttons_sizer->Add($text, 1, wxEXPAND | wxALIGN_RIGHT);
|
||||||
|
Loading…
Reference in New Issue
Block a user