On Wed, 12 Oct 2011, Chris Travers wrote:

> On Wed, Oct 12, 2011 at 9:23 PM, Chris Travers <[email protected]> wrote:
>> Wait.
>>
>> What svn revision are you running?

svn info
Path: .
URL: 
https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.3
Repository Root: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb
Repository UUID: 4979c152-3d1c-0410-bac9-87ea11338e46
Revision: 3857
Node Kind: directory
Schedule: normal
Last Changed Author: einhverfr
Last Changed Rev: 3853
Last Changed Date: 2011-10-12 16:06:49 -0600 (Wed, 12 Oct 2011)

>>
> In particular, see if an svn up fixes this.  I wonder if you are using
> a bad commit with an issue that was since fixed.

[Thu Oct 13 19:52:23 2011] [error] [client 127.0.0.1] WARNING: LedgerSMB 
configured to use LaTeX but module Template::Latex did not load: Bad file 
descriptor, referer: http://loca
lhost/lsmb13/login.pl
[Thu Oct 13 19:52:23 2011] [error] [client 127.0.0.1] Disabling LaTeX 
support, referer: http://localhost/lsmb13/login.pl


Nope

>
> If not, please email me your LedgerSMB/Sysconfig.pm so I can see if an
> earlier version of the code has somehow gotten lodged there.


#  This is the new configuration file for LedgerSMB.  Eventually all system
# configuration directives will go here,  This will probably not fully replace
# the ledgersmb.conf until 1.3, however.

package LedgerSMB::Sysconfig;
use strict;
use warnings;
no strict qw(refs);
use Cwd;

# use LedgerSMB::Form;
use Config::Std;
use DBI qw(:sql_types);
binmode STDOUT, ':utf8';
binmode STDERR, ':utf8';

# For Win32, change $pathsep to ';';
our $pathsep = ':';

our $auth = 'DB';
our $logging = 0;      # No logging on by default
our $images = getcwd() . '/images';

our $force_username_case = undef; # don't force case

our @io_lineitem_columns = qw(unit onhand sellprice discount linetotal);

# Whitelist for redirect destination
#
our @newscripts = qw(
      account.pl  customer.pl  inventory.pl  payment.pl  user.pl
admin.pl    drafts.pl    journal.pl    recon.pl    vendor.pl
asset.pl    employee.pl  login.pl      setup.pl    vouchers.pl
file.pl      menu.pl       taxform.pl);

our @scripts = (
     'aa.pl', 'am.pl',      'ap.pl',
     'ar.pl', 'arap.pl',  'arapprn.pl', 'bp.pl',
     'ca.pl', 'gl.pl',
     'ic.pl',  'ir.pl',
     'is.pl', 'jc.pl',    'login.pl',   'menu.pl',
     'oe.pl', 'pe.pl',    'pos.pl',     'ps.pl',
     'pw.pl', 'rc.pl',    'rp.pl',      'initiate.pl'
);

# if you have latex installed set to 1
our $latex = 1;

# Defaults to 1 megabyte
our $max_post_size = 1024 * 1024;

# defaults to 2-- default number of places to round amounts to
our $decimal_places = 2;

# defaults to LedgerSMB-1.3 - default spelling of cookie
our $cookie_name = "LedgerSMB-1.3";

# spool directory for batch printing
our $spool = "spool";

our $cache_templates = 0;
# path to user configuration files
our $userspath = "users";

# templates base directory
our $templates = "templates";

# Temporary files stored at"
our $tempdir = ( $ENV{TEMP} || '/tmp' );

our $cache_template_dir = "$tempdir/lsmb_templates";
# Backup path
our $backuppath = $tempdir;

# member file
our $memberfile = "users/members";

# location of sendmail
our $sendmail = "/usr/sbin/sendmail -t";

# SMTP settings
our $smtphost   = '';
our $smtptimout = 60;
our $smtpuser   = '';
our $smtppass   = '';
our $smtpauthmethod = '';

# set language for login and admin
our $language = "";

# Maximum number of invoices that can be printed on a check
our $check_max_invoices = 5;

# program to use for file compression
our $gzip = "gzip -S .gz";

# Path to the translation files
our $localepath = 'locale/po';

our $no_db_str = 'database';
our $log_level = 'ERROR';
# available printers
our %printer;

our %config;
read_config( 'ledgersmb.conf' => %config ) or die;
# Root variables
for my $var (
     qw(pathsep logging log_level check_max_invoices language auth latex
     db_autoupdate force_username_case max_post_size decimal_places cookie_name
     return_accno no_db_str tempdir cache_templates)
   )
{
     ${$var} = $config{''}{$var} if $config{''}{$var};
}

if ($latex){
     eval { require Template::Latex }; # Trap errors loading this optional 
module
     if ($!) { # Couldn't load  Template::Latex
         print STDERR "WARNING: LedgerSMB configured to use LaTeX but module ";
         print STDERR "Template::Latex did not load: $!\n";
         print STDERR "Disabling LaTeX support\n";
         $latex = 0;
     };
}

%printer = %{ $config{printers} } if $config{printers};

# ENV Paths
for my $var (qw(PATH PERL5LIB)) {
     if (ref $config{environment}{$var} eq 'ARRAY') {
         $ENV{$var} .= $pathsep . ( join $pathsep, @{ 
$config{environment}{$var} } );
     } elsif ($config{environment}{$var}) {
         $ENV{$var} .= $pathsep . $config{environment}{$var};
     }
}

# Application-specific paths
for my $var (qw(localepath spool templates images)) {
     ${$var} = $config{paths}{$var} if $config{paths}{$var};
}

# Programs
for my $var (qw(gzip)) {
     ${$var} = $config{programs}{$var} if $config{programs}{$var};
}

# LaTeX and friends 
for my $var (qw(pdflatex latex dvips)){
     if ($latex and $config{programs}{$var}){
         my $funcname = "${var}_path";
         Template::Latex->$funcname( { $var => $config{programs}{$var} });
     }
}

# mail configuration
for my $var (qw(sendmail smtphost smtptimeout smtpuser
              smtppass smtpauthmethod)) 
{
     ${$var} = $config{mail}{$var} if $config{mail}{$var};
}

# Log4perl configuration
our $log4perl_config = qq(
     log4perl.rootlogger = $log_level, Screen, Basic
     log4perl.appender.Screen = Log::Log4perl::Appender::Screen
     log4perl.appender.Screen.layout = SimpleLayout
     # Filter for debug level
     log4perl.filter.MatchDebug = Log::Log4perl::Filter::LevelMatch
     log4perl.filter.MatchDebug.LevelToMatch = DEBUG
     log4perl.filter.MatchDebug.AcceptOnMatch = true

     # Filter for everything but debug level
     log4perl.filter.MatchRest = Log::Log4perl::Filter::LevelMatch
     log4perl.filter.MatchRest.LevelToMatch = DEBUG
     log4perl.filter.MatchRest.AcceptOnMatch = false

     # layout for DEBUG messages
     log4perl.appender.Debug = Log::Log4perl::Appender::Screen
     log4perl.appender.Debug.layout = PatternLayout
     log4perl.appender.Debug.layout.ConversionPattern = %d - %p - %l -- %m%n
     log4perl.appender.Debug.Filter = MatchDebug

     # layout for non-DEBUG messages
     log4perl.appender.Basic = Log::Log4perl::Appender::Screen
     log4perl.appender.Basic.layout = PatternLayout
     log4perl.appender.Basic.layout.ConversionPattern = %d - %p %m%n
     log4perl.appender.Basic.Filter = MatchRest

);

$ENV{PGHOST} = $config{database}{host};
$ENV{PGPORT} = $config{database}{port};
our $default_db = $config{database}{default_db};
our $db_namespace = $config{database}{db_namespace} || 'public';
$ENV{PGSSLMODE} = $config{database}{sslmode} if $config{database}{sslmode};
$ENV{PG_CONTRIB_DIR} = $config{database}{contrib_dir};

1;

>
> Best Wishes,
> Chris Travers
>
> ------------------------------------------------------------------------------
> All the data continuously generated in your IT infrastructure contains a
> definitive record of customers, application performance, security
> threats, fraudulent activity and more. Splunk takes this data and makes
> sense of it. Business sense. IT sense. Common sense.
> http://p.sf.net/sfu/splunk-d2d-oct
> _______________________________________________
> Ledger-smb-devel mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/ledger-smb-devel
>

------------------------------------------------------------------------------
All the data continuously generated in your IT infrastructure contains a
definitive record of customers, application performance, security
threats, fraudulent activity and more. Splunk takes this data and makes
sense of it. Business sense. IT sense. Common sense.
http://p.sf.net/sfu/splunk-d2d-oct
_______________________________________________
Ledger-smb-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/ledger-smb-devel

Reply via email to