diff options
Diffstat (limited to 'lib/Xconfig/xfree.pm')
| -rw-r--r-- | lib/Xconfig/xfree.pm | 5 |
1 files changed, 5 insertions, 0 deletions
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 ################################################################### |