summaryrefslogtreecommitdiffstats
path: root/perl-install/Xconfig/xfree.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-02-05 13:34:08 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-02-05 13:34:08 +0000
commit702d47173101dd8bb132cb22170f38bf82b55344 (patch)
tree27d22d6f80b0693281dc50ada5a64bee7a2e6421 /perl-install/Xconfig/xfree.pm
parent8b346ef435ed5dd491b2e49a278b5b746e6dd142 (diff)
downloaddrakx-702d47173101dd8bb132cb22170f38bf82b55344.tar
drakx-702d47173101dd8bb132cb22170f38bf82b55344.tar.gz
drakx-702d47173101dd8bb132cb22170f38bf82b55344.tar.bz2
drakx-702d47173101dd8bb132cb22170f38bf82b55344.tar.xz
drakx-702d47173101dd8bb132cb22170f38bf82b55344.zip
- add ->prepare_write to allow comparing raw_X's
- ensure "config_changed" is returned only if the config file really changed
Diffstat (limited to 'perl-install/Xconfig/xfree.pm')
-rw-r--r--perl-install/Xconfig/xfree.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/Xconfig/xfree.pm b/perl-install/Xconfig/xfree.pm
index 8df42bd8a..df6c0d3e0 100644
--- a/perl-install/Xconfig/xfree.pm
+++ b/perl-install/Xconfig/xfree.pm
@@ -20,6 +20,10 @@ sub write {
$both->{xfree3} ? $both->{xfree3}->write($o_xfree3_file) : unlink($o_xfree3_file);
$both->{xfree4} ? $both->{xfree4}->write($o_xfree4_file) : unlink($o_xfree4_file);
}
+sub prepare_write {
+ my ($both) = @_;
+ ($both->{xfree4} || $both->{xfree3})->prepare_write;
+}
sub empty_config {
my ($class) = @_;