From f277b072442439fa78f16f5fb75869793620e397 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 23 Jan 2003 16:41:38 +0000
Subject: (to_string): created, try to shortly describe current configuration
 (configure_FB_TVOUT): don't do anything when not using XF4

---
 perl-install/Xconfig/various.pm | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'perl-install/Xconfig')

diff --git a/perl-install/Xconfig/various.pm b/perl-install/Xconfig/various.pm
index ae74020fb..2ea15e841 100644
--- a/perl-install/Xconfig/various.pm
+++ b/perl-install/Xconfig/various.pm
@@ -9,6 +9,12 @@ use Xconfig::resolution_and_depth;
 use common;
 
 
+sub to_string {
+    my ($raw_X) = @_;
+
+    $raw_X->is_fbdev ? 'frame-buffer' : Xconfig::resolution_and_depth::to_string($raw_X->get_resolution);
+}
+
 sub info {
     my ($raw_X, $card) = @_;
     my $info;
@@ -97,6 +103,7 @@ sub configure_FB_TVOUT {
 
     my $raw_X = Xconfig::default::configure();
     my $xfree4 = $raw_X->{xfree4};
+    return if is_empty_array_ref($xfree4);
 
     $xfree4->set_monitors({ HorizSync => '30-50', VertRefresh => ($use_FB_TVOUT->{norm} eq 'NTSC' ? 60 : 50) });
     first($xfree4->get_monitor_sections)->{ModeLine} = [ 
-- 
cgit v1.2.1