diff options
Diffstat (limited to 'lib/Loadbars/Main.pm')
| -rw-r--r-- | lib/Loadbars/Main.pm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/lib/Loadbars/Main.pm b/lib/Loadbars/Main.pm index 199a2e4..68a114e 100644 --- a/lib/Loadbars/Main.pm +++ b/lib/Loadbars/Main.pm @@ -294,8 +294,16 @@ sub loop ($@) { my $num_stats = 1; $C{width} = $C{barwidth}; + my $title = do { + if (defined $C{title}) { + $C{title}; + } else { + 'Loadbars ' . get_version . ' (press h for help on stdout)'; + } + }; + my $app = SDL::App->new( - -title => 'Loadbars ' . get_version . ' (press h for help on stdout)', + -title => $title, -icon_title => Loadbars::Constants->VERSION, -width => $C{width}, -height => $C{height}, |
