summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS2
-rwxr-xr-xperl-install/standalone/drakfont4
2 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index c8de3696c..3941f696f 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -3,6 +3,8 @@
- drakclock:
o fix crash on clicking "Cancel" after TZ selection (mga#13534)
o fix loosing TZ choice when canceling TZ selection (mga#13534)
+- drakfont:
+ o fix installing fonts (Frédéric Buclin, mga#11849)
Version 16.33 - 18 June 2014
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 68e4c67eb..ba9e17ab0 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -582,8 +582,8 @@ sub font_choice() {
$file_dialog->destroy;
return;
} elsif ($answer eq 'ok') {
- my @files = $file_dialog->get_filenames;
- foreach my $file_name (difference2(\@files, \@install)) {
+ my $files = $file_dialog->get_filenames;
+ foreach my $file_name (difference2($files, \@install)) {
push @install, $file_name;
$model->append_set(undef, [ 0 => $file_name ]);
}