summaryrefslogtreecommitdiffstats
path: root/perl-install/Xconfig
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/Xconfig')
-rw-r--r--perl-install/Xconfig/xfree.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/Xconfig/xfree.pm b/perl-install/Xconfig/xfree.pm
index 95a3b5b49..f9b6eaa54 100644
--- a/perl-install/Xconfig/xfree.pm
+++ b/perl-install/Xconfig/xfree.pm
@@ -321,7 +321,7 @@ sub get_monitors {
my @raw_monitors = $raw_X->get_Sections('Monitor');
map {
my $h = raw_export_section($_, [ 'Identifier', @monitor_fields ]);
- $h->{ModeLine} = $_->{ModeLine};
+ $h->{ModeLine} = $_->{ModeLine} if $_->{ModeLine};
$h;
} @raw_monitors;
}
@@ -331,7 +331,7 @@ sub set_monitors {
mapn {
my ($raw_monitor, $monitor) = @_;
raw_import_section($raw_monitor, $monitor, \@monitor_fields);
- $raw_monitor->{ModeLine} = $monitor->{ModeLine};
+ $raw_monitor->{ModeLine} = $monitor->{ModeLine} if $monitor->{ModeLine};
} \@raw_monitors, \@monitors;
}
sub get_or_new_monitors {