Convert main configuration to using LedgerSMB::Sysconfig

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@381 4979c152-3d1c-0410-bac9-87ea11338e46

1 files changed, 3 insertions, 14 deletions

diff --git a/menu.pl b/menu.pl
index 781854c0..1aa45194 100755
--- a/menu.pl
+++ b/menu.pl
@@ -46,16 +46,7 @@
 #
 #######################################################################
 
-# setup defaults, DO NOT CHANGE
-$userspath = "users";
-$spool = "spool";
-${LedgerSMB::Sysconfig::templates} = "templates";
-$memberfile = "users/members";
-$sendmail = "| /usr/sbin/sendmail -t";
-$latex = 0;
-%printer = ();
-########## end ###########################################
-
+use LedgerSMB::Sysconfig;
 
 $| = 1;
 
@@ -63,8 +54,6 @@ use LedgerSMB::Form;
 use LedgerSMB::Locale;
 use LedgerSMB::Session;
 
-eval { require "ledger-smb.conf"; };
-
 # for custom preprocessing logic
 eval { require "custom.pl"; };
 
@@ -85,7 +74,7 @@ $script =~ s/\.pl//;
 use DBI qw(:sql_types);
 
 # check for user config file, could be missing or ???
-eval { require("$userspath/$form->{login}.conf"); };
+eval { require("${LedgerSMB::Sysconfig::userspath}/$form->{login}.conf"); };
 if ($@) {
 	$locale = LedgerSMB::Locale->get_handle($myconfig{countrycode}) or
 		$form->error("Locale not loaded: $!\n");
@@ -119,7 +108,7 @@ $form->db_init(\%myconfig);
 if ($form->{path} ne 'bin/lynx'){ $form->{path} = 'bin/mozilla';}	
 
 # did sysadmin lock us out
-if (-f "$userspath/nologin") {
+if (-f "${LedgerSMB::Sysconfig::userspath}/nologin") {
 	$form->error($locale->text('System currently down for maintenance!'));
 }