summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lib/Xconfig/various.pm3
-rw-r--r--lib/Xconfig/xfree.pm5
2 files changed, 6 insertions, 2 deletions
diff --git a/lib/Xconfig/various.pm b/lib/Xconfig/various.pm
index a762f0c..1ba652e 100644
--- a/lib/Xconfig/various.pm
+++ b/lib/Xconfig/various.pm
@@ -116,8 +116,7 @@ sub config {
$card->{Options}{AddARGBGLXVisuals} = undef;
}
} else {
- my $raw = $raw_X->get_Section('Extensions') || $raw_X->add_Section('Extensions', {});
- $raw->{Composite} = { 'Option' => 1, val => 'Disable' };
+ $raw_X->set_extension('Composite', 'Disable');
if ($card->{Driver} eq 'nvidia') {
delete $card->{Options}{AddARGBGLXVisuals};
diff --git a/lib/Xconfig/xfree.pm b/lib/Xconfig/xfree.pm
index edb1541..684861f 100644
--- a/lib/Xconfig/xfree.pm
+++ b/lib/Xconfig/xfree.pm
@@ -540,6 +540,11 @@ sub get_extension {
my $raw = $raw_X->get_Section('Extensions');
$raw && $raw->{Composite} && $raw->{Composite}[0]{val};
}
+sub set_extension {
+ my ($raw_X, $extension, $val) = @_;
+ my $raw = $raw_X->get_Section('Extensions') || $raw_X->add_Section('Extensions', {});
+ $raw->{Composite} = { 'Option' => 1, val => $val };
+}
################################################################################
# ModulePath ###################################################################