From ff9168b4e431ee459c0c97b3ac96c039d996cc6f Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 3 Aug 2005 09:50:47 +0000
Subject: don't have empty ModeLines lying around (bugzilla #16960)

---
 perl-install/Xconfig/xfree.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/Xconfig/xfree.pm')

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 {
-- 
cgit v1.2.1