From 7fc20163a3bc2a414c1456b7429b3f7f206c37f9 Mon Sep 17 00:00:00 2001 From: Daouda Lo Date: Tue, 15 Jun 2004 08:59:52 +0000 Subject: - remote control linux/uni, windows --- control-center | 29 ++++++++++++++++++----------- 1 file changed, 18 insertions(+), 11 deletions(-) diff --git a/control-center b/control-center index c7faaf06..2ded28cd 100755 --- a/control-center +++ b/control-center @@ -113,6 +113,7 @@ my $isWiz = -e "/usr/sbin/drakwizard"; my $isRpmDrake = -e "/usr/sbin/rpmdrake"; my $isParkRpmDrake = -e "/usr/sbin/park-rpmdrake"; my $isWebAdmin = -e "/usr/bin/mdkwebadmin"; +my $isRfbDrake = -e "/usr/X11R6/bin/rfbdrake"; # { key => [ log_exp, binary, gtkplug?, description ] } # { key => [ log_exp, [ binary, win_nb ], gtkplug?, description ] } @@ -154,6 +155,7 @@ my $exec_hash = "Printer" => [ "printerdrake", "$sbindir/printerdrake", -1, N("Printers"), "$sbindir/printerdrake" ], "Programs scheduling" => [ "drakcronat", "/usr/X11R6/bin/drakcronat", 1, N("Scheduled tasks") ], #DrakCronAt enables to schedule Programs execution through crond and atd daemons "Proxy Configuration" => [ "drakproxy", "$sbindir/drakproxy", 1, N("Proxy") ], #for files and web browsing + "Remote Control" => [ "rfbdrake", "$xbindir/rfbdrake", 1, N("Remote Control (Linux/Unix, Windows)") ], "Remove Interface" => [ "drakconnect", "$sbindir/drakconnect --del", 1, N("Remove a connection") ], "Remove Software" => [ "rpmdrake", "$sbindir/rpmdrake-remove", 1, N("Remove") ], "Resolution" => [ "XFdrake", "$sbindir/XFdrake resolution", 1, N("Screen resolution") ], @@ -293,19 +295,24 @@ my @tree = ) ] ]), - if_($isWebAdmin, + if_($isWebAdmin || $isRfbDrake, [ N("Online Administration"), 'online-administration-mdk', [ - (map { - my ($id, $icon, $op, $description) = @$_; - $exec_hash->{$id} = [ "mdkwebadmin", "$bindir/mdkwebadmin.pl $op", -1, $description ]; - [ $id, $icon ]; - } (# [ id, wizard file name, icon, description ] - [ "Local Admin", 'local-administration-mdk', '--direct', N("Local administration") ], - [ "Remote Admin", 'remote-administration-mdk', '--link', N("Remote administration") ]) - ) - ] - ]), + if_($isWebAdmin, + (map { + my ($id, $icon, $op, $description) = @$_; + $exec_hash->{$id} = [ "mdkwebadmin", "$bindir/mdkwebadmin.pl $op", -1, $description ]; + [ $id, $icon ]; + } (# [ id, wizard file name, icon, description ] + [ "Local Admin", 'local-administration-mdk', '--direct', N("Local administration") ], + [ "Remote Admin", 'remote-administration-mdk', '--link', N("Remote administration") ]) + ) + ), + if_($isRfbDrake, + ["Remote Control", 'internet-access-mdk'] + ) + ] + ]), ); -- cgit v1.2.1