summaryrefslogtreecommitdiffstats
path: root/perl-install/network/network.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/network/network.pm')
-rw-r--r--perl-install/network/network.pm9
1 files changed, 2 insertions, 7 deletions
diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm
index 411b5030b..996b6691c 100644
--- a/perl-install/network/network.pm
+++ b/perl-install/network/network.pm
@@ -347,13 +347,11 @@ xml:readonly:$defaults_dir
));
-d $p_defaults_dir or mkdir $p_defaults_dir, 0755;
- require Gnome2::GConf;
- my $gconf = Gnome2::GConf::Client->get_source("xml::$p_defaults_dir", 1);
my $use_alternate_proxy;
-
my $gconf_set = sub {
my ($key, $type, $value) = @_;
- $gconf->set($key, { type => $type, value => $value });
+ #- gconftool-2 is available since /etc/gconf/2/ exists
+ system("gconftool-2", "--config-source=xml::$p_defaults_dir", "--direct", "--set", "--type=$type", $key, $value);
};
#- http proxy
@@ -391,9 +389,6 @@ xml:readonly:$defaults_dir
#- set proxy mode to manual if either https or ftp is used
$gconf_set->("/system/proxy/mode", "string", $use_alternate_proxy ? "manual" : "none");
- #- apply settings in local file
- $gconf->suggest_sync;
-
#- make gconf daemons reload their settings
system("killall -s HUP gconfd-2");
}