From b8bd775b5130b77409ed25512c7cb98176e5a6a1 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Fri, 3 Mar 2006 17:06:15 +0000 Subject: autoconf bluetooth controllers (enable bluetooth service) --- perl-install/harddrake/autoconf.pm | 12 ++++++++++++ perl-install/harddrake/data.pm | 2 +- 2 files changed, 13 insertions(+), 1 deletion(-) (limited to 'perl-install/harddrake') diff --git a/perl-install/harddrake/autoconf.pm b/perl-install/harddrake/autoconf.pm index b451286df..85be3ea4b 100644 --- a/perl-install/harddrake/autoconf.pm +++ b/perl-install/harddrake/autoconf.pm @@ -43,4 +43,16 @@ sub pcmcia { }); } +sub bluetooth { + my ($enable) = @_; +#- FIXME: make sure these packages are installed when needed +# if ($enable) { +# require do_pkgs; +# my $do_pkgs = do_pkgs_standalone->new; +# $do_pkgs->ensure_is_installed("bluez-utils", "/usr/bin/rfcomm"); +# } + require services; + services::set_status("bluetooth", $enable); +} + 1; diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm index 68fc2b738..f0c54e683 100644 --- a/perl-install/harddrake/data.pm +++ b/perl-install/harddrake/data.pm @@ -257,7 +257,7 @@ our @tree = icon => "hw_network.png", configurator => "", detector => sub { f(modules::probe_category('bus/bluetooth')) }, - checked_on_boot => 0, + checked_on_boot => 1, }, { -- cgit v1.2.1