diff options
| author | Andreas Brachold <vdr07@deltab.de> | 2008-10-06 09:00:44 +0000 |
|---|---|---|
| committer | Andreas Brachold <vdr07@deltab.de> | 2008-10-06 09:00:44 +0000 |
| commit | 0d66c4b5d972e6e439bec0a3028c8de70e137db8 (patch) | |
| tree | a2ce6741ac448a310e1021675a481d7f55de796e /bin | |
| parent | 2b6688ca3d2e21c7339e39a98109b3e2cebc75ee (diff) | |
| download | xxv-0d66c4b5d972e6e439bec0a3028c8de70e137db8.tar.gz xxv-0d66c4b5d972e6e439bec0a3028c8de70e137db8.tar.bz2 | |
* TIMER/tlist: display used recorder
* CONFIG: Remove double reconfigure
* CONFIG: Remove unusable command write configuation
* Base: remove command restart
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/xxvd | 48 |
1 files changed, 0 insertions, 48 deletions
@@ -5,7 +5,6 @@ use strict; use FindBin qw($RealBin); my $TEMPLMOD; -my $START = time; # Test on Template Modul in normale Path BEGIN { @@ -181,8 +180,6 @@ $MODULES->{'XXV::MODULES::General'}->{MOD} = &module; &docu; -my $starttime = time - $START; - while(Event::loop(1)) {}; # THE MAIN PROGRAM --------------------------------- END @@ -392,14 +389,6 @@ sub getGeneralConfig { return $Config->{General}; } - -# ------------------ -sub getStartTime { -# ------------------ - return $START; -} - - # ------------------ sub getVersion { # ------------------ @@ -513,27 +502,6 @@ sub more { } # ------------------ -sub restart { -# ------------------ - my $watcher = shift; - my $console = shift; - - if(-x $Config->{General}->{initscript}) { - my $msg = sprintf(gettext("The xxv system will restart now. Please try to re-login in %d seconds."), $starttime); - $console->message($msg); - debug $msg; - $console->redirect({url => '/', wait => $starttime, parent => 'top'}) - if($console->typ eq 'HTML'); - my $initscript = $Config->{General}->{initscript}; - my $run = sprintf('echo "%s restart" | at now', $initscript); - - my $erg = `$run`; - } else { - $console->err(gettext("Couldn't restart the xxv system! Script for initialization couldn't be executed.")); - } -} - -# ------------------ sub getDBVersion { # ------------------ return $DBVERSION if($DBVERSION); @@ -734,12 +702,6 @@ sub module { } }, }, - initscript => { - description => gettext('Initialization script to restart xxv'), - default => '/etc/init.d/xxvd', - type => 'file', - required => gettext("This is required!"), - }, }, Commands => { doc => { @@ -756,16 +718,6 @@ sub module { }, }, }; - # Only as superuser - if(0 == $<) - { - $args->{'Commands'}->{'restart'} = { - description => gettext('Call initialization script to restart the xxv system.'), - short => 'restart', - callback => sub{ restart(@_) }, - Level => 'admin', - }; - } return $args; } |
