|
|
|
@ -22,7 +22,7 @@ use ConfigFile;
|
|
|
|
|
my ($pagedata, $pagename);
|
|
|
|
|
|
|
|
|
|
my ($LANGUAGE_DIR, $LANGUAGE, $TEMPLATE_DIR, $DOC_DIR);
|
|
|
|
|
my ($CB_SCRIPT, $LOG_FILE, $DEVELOPMENT_MARKER);
|
|
|
|
|
my ($CB_SCRIPT, $LOG_FILE, $IS_DEV);
|
|
|
|
|
|
|
|
|
|
my $config = ConfigFile::read_config_file('/etc/cryptobox/cryptobox.conf');
|
|
|
|
|
|
|
|
|
@ -32,7 +32,7 @@ $LANGUAGE_DIR = $config->{LANGUAGE_DIR};
|
|
|
|
|
$LANGUAGE = $config->{LANGUAGE};
|
|
|
|
|
$TEMPLATE_DIR = $config->{TEMPLATE_DIR};
|
|
|
|
|
$DOC_DIR = $config->{DOC_DIR};
|
|
|
|
|
$DEVELOPMENT_MARKER = $config->{DEVELOPMENT_MARKER};
|
|
|
|
|
$IS_DEV = ( -e $config->{DEV_FEATURES_SCRIPT});
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#################### subs ######################
|
|
|
|
@ -391,7 +391,7 @@ $pagedata->setValue('Data.Config.Language', `$CB_SCRIPT get_config language`);
|
|
|
|
|
$output = (-e "$LOG_FILE") ? `cat '$LOG_FILE' | sed 's/^/<br>/'` : '';
|
|
|
|
|
$pagedata->setValue('Data.Log',"$output");
|
|
|
|
|
|
|
|
|
|
$pagedata->setValue('Data.Status.DevelopmentMode', 1) if (-e "$DEVELOPMENT_MARKER");
|
|
|
|
|
$pagedata->setValue('Data.Status.DevelopmentMode', 1) if ($IS_DEV);
|
|
|
|
|
|
|
|
|
|
&render();
|
|
|
|
|
|
|
|
|
|