diff options
Diffstat (limited to 'modules')
-rwxr-xr-x | modules/services/servicemanager | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/modules/services/servicemanager b/modules/services/servicemanager new file mode 100755 index 0000000..1075865 --- /dev/null +++ b/modules/services/servicemanager @@ -0,0 +1,29 @@ +#!/usr/bin/perl + +use strict; +use lib qw(/usr/lib/libDrakX); + +use standalone; #- warning, standalone must be loaded very first, for 'explanations' + +use common; +use interactive; +use AdminPanel::Shared; +use AdminPanel::Services::services; +use log; + +use yui; + +my $wm_icon = "/usr/share/mcc/themes/default/service-mdk.png"; + +yui::YUI::app()->setApplicationTitle(N("Services and daemons")); +yui::YUI::app()->setApplicationIcon($wm_icon); + +AdminPanel::Services::services::servicePanel(); + + + +# my $in = 'interactive'->vnew('su'); +# begin: +# my $l = services::ask($in); +# services::doit($in, $l) if $l; +# $in->exit(0); |