From 9d968363c52ee1febd9ff0fce38e2e56acee1270 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 5 Jun 2008 17:10:15 +0000
Subject: create remove_extension() and use it

---
 lib/Xconfig/various.pm |  6 ++----
 lib/Xconfig/xfree.pm   | 10 ++++++++++
 2 files changed, 12 insertions(+), 4 deletions(-)

diff --git a/lib/Xconfig/various.pm b/lib/Xconfig/various.pm
index 33de577..5379d21 100644
--- a/lib/Xconfig/various.pm
+++ b/lib/Xconfig/various.pm
@@ -117,10 +117,8 @@ sub config {
 	    $card->{Options}{AddARGBGLXVisuals} = undef;
 	}
     } else {
-	if (my $raw = $raw_X->get_Section('Extensions')) {
-	    delete $raw->{Composite};
-	    %$raw or $raw_X->remove_Section('Extensions');
-	}
+	$raw_X->remove_extension('Composite');
+
 	if ($card->{Driver} eq 'nvidia') {
 	    delete $card->{Options}{AddARGBGLXVisuals};
 	}
diff --git a/lib/Xconfig/xfree.pm b/lib/Xconfig/xfree.pm
index de4fd4b..23c0910 100644
--- a/lib/Xconfig/xfree.pm
+++ b/lib/Xconfig/xfree.pm
@@ -526,6 +526,16 @@ sub set_load_module {
 }
 
 
+################################################################################
+# modules ######################################################################
+################################################################################
+sub remove_extension {
+    my ($raw_X, $extension) = @_;
+    my $raw = $raw_X->get_Section('Extensions') or return;
+    delete $raw->{$extension};
+    %$raw or $raw_X->remove_Section('Extensions');
+}
+
 ################################################################################
 # ModulePath ###################################################################
 ################################################################################
-- 
cgit v1.2.1