summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/draksplash4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash
index 3f3ed2957..000e28871 100755
--- a/perl-install/standalone/draksplash
+++ b/perl-install/standalone/draksplash
@@ -183,7 +183,7 @@ sub choose_image {
$file_dialog->destroy;
}
-sub choose_color() {
+sub choose_color {
my ($var) = @_;
my $color = gtkshow(Gtk2::ColorSelectionDialog->new(N("Color selection")));
print "Current color $var: $theme{conf}{$var}\n";
@@ -223,7 +223,7 @@ sub get_scale_max {
my ($name) = @_;
if ($name =~ /size/) { return 100 }
if ($name =~ /transp/) { return 255 }
- $theme{$name =~ /[xw]$/ ? "res_w" : "res_h"}
+ $theme{$name =~ /[xw]$/ ? "res_w" : "res_h"};
}
sub apply_scale {
my ($name) = @_;