diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-03-24 17:36:04 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-03-24 17:36:04 +0000 |
commit | aa5f616d44a84ffb6c0c8d861434663f35d66faf (patch) | |
tree | 6a48abf424e91ec64ec33ca114cd17bee7fdd48a | |
parent | b08cb0ba7c51c1dc9019881b26b25469041fea10 (diff) |
Removing executable bit from .pm files in svn
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@999 4979c152-3d1c-0410-bac9-87ea11338e46
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/AA.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/AM.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/BP.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/CA.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/CP.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/CT.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/Form.pm | 13 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/GL.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/HR.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/IC.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/IR.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/IS.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/Inifile.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/JC.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/Mailer.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/Menu.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/Num2text.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/OE.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/OP.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/PE.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/RC.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/RP.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/Session.pm | 0 | ||||
-rw-r--r-- | LedgerSMB/Sysconfig.pm | 3 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/Tax.pm | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | LedgerSMB/User.pm | 0 |
26 files changed, 11 insertions, 5 deletions
diff --git a/LedgerSMB/AA.pm b/LedgerSMB/AA.pm index 77c97b0a..77c97b0a 100755..100644 --- a/LedgerSMB/AA.pm +++ b/LedgerSMB/AA.pm diff --git a/LedgerSMB/AM.pm b/LedgerSMB/AM.pm index 66795305..66795305 100755..100644 --- a/LedgerSMB/AM.pm +++ b/LedgerSMB/AM.pm diff --git a/LedgerSMB/BP.pm b/LedgerSMB/BP.pm index 6b9bf73d..6b9bf73d 100755..100644 --- a/LedgerSMB/BP.pm +++ b/LedgerSMB/BP.pm diff --git a/LedgerSMB/CA.pm b/LedgerSMB/CA.pm index 2c4ff105..2c4ff105 100755..100644 --- a/LedgerSMB/CA.pm +++ b/LedgerSMB/CA.pm diff --git a/LedgerSMB/CP.pm b/LedgerSMB/CP.pm index bfd18585..bfd18585 100755..100644 --- a/LedgerSMB/CP.pm +++ b/LedgerSMB/CP.pm diff --git a/LedgerSMB/CT.pm b/LedgerSMB/CT.pm index 5e70e302..5e70e302 100755..100644 --- a/LedgerSMB/CT.pm +++ b/LedgerSMB/CT.pm diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm index ff436451..e75b3fd4 100755..100644 --- a/LedgerSMB/Form.pm +++ b/LedgerSMB/Form.pm @@ -78,11 +78,16 @@ sub new { bless $self, $type; - $self->{path} =~ s#\\#/#g; - if (($self->{path}) && ($self->{path} !~ m#^bin/#) - || ($self->{path} =~ m#(\w*/){2,}#)){ - $self->error("Access Denied"); + if ($self->{path} eq "bin/lynx"){ + $self->{menubar} = 1; + #menubar will be deprecated, replaced with below + $self->{lynx} = 1; + $self->{path} = "bin/lynx"; + } else { + $self->{path} = "bin/mozilla"; + } + if (($self->{script} =~ m#(..|\\|/)#)){ $self->error("Access Denied"); } diff --git a/LedgerSMB/GL.pm b/LedgerSMB/GL.pm index dab7b0a1..dab7b0a1 100755..100644 --- a/LedgerSMB/GL.pm +++ b/LedgerSMB/GL.pm diff --git a/LedgerSMB/HR.pm b/LedgerSMB/HR.pm index 33e9b18a..33e9b18a 100755..100644 --- a/LedgerSMB/HR.pm +++ b/LedgerSMB/HR.pm diff --git a/LedgerSMB/IC.pm b/LedgerSMB/IC.pm index 5594c176..5594c176 100755..100644 --- a/LedgerSMB/IC.pm +++ b/LedgerSMB/IC.pm diff --git a/LedgerSMB/IR.pm b/LedgerSMB/IR.pm index d04f0448..d04f0448 100755..100644 --- a/LedgerSMB/IR.pm +++ b/LedgerSMB/IR.pm diff --git a/LedgerSMB/IS.pm b/LedgerSMB/IS.pm index 86aea81b..86aea81b 100755..100644 --- a/LedgerSMB/IS.pm +++ b/LedgerSMB/IS.pm diff --git a/LedgerSMB/Inifile.pm b/LedgerSMB/Inifile.pm index 839c19f3..839c19f3 100755..100644 --- a/LedgerSMB/Inifile.pm +++ b/LedgerSMB/Inifile.pm diff --git a/LedgerSMB/JC.pm b/LedgerSMB/JC.pm index fb82c8ee..fb82c8ee 100755..100644 --- a/LedgerSMB/JC.pm +++ b/LedgerSMB/JC.pm diff --git a/LedgerSMB/Mailer.pm b/LedgerSMB/Mailer.pm index 05a711bd..05a711bd 100755..100644 --- a/LedgerSMB/Mailer.pm +++ b/LedgerSMB/Mailer.pm diff --git a/LedgerSMB/Menu.pm b/LedgerSMB/Menu.pm index 344bb7d7..344bb7d7 100755..100644 --- a/LedgerSMB/Menu.pm +++ b/LedgerSMB/Menu.pm diff --git a/LedgerSMB/Num2text.pm b/LedgerSMB/Num2text.pm index 8382df5c..8382df5c 100755..100644 --- a/LedgerSMB/Num2text.pm +++ b/LedgerSMB/Num2text.pm diff --git a/LedgerSMB/OE.pm b/LedgerSMB/OE.pm index de624ddd..de624ddd 100755..100644 --- a/LedgerSMB/OE.pm +++ b/LedgerSMB/OE.pm diff --git a/LedgerSMB/OP.pm b/LedgerSMB/OP.pm index 13f9da01..13f9da01 100755..100644 --- a/LedgerSMB/OP.pm +++ b/LedgerSMB/OP.pm diff --git a/LedgerSMB/PE.pm b/LedgerSMB/PE.pm index 099f94ce..099f94ce 100755..100644 --- a/LedgerSMB/PE.pm +++ b/LedgerSMB/PE.pm diff --git a/LedgerSMB/RC.pm b/LedgerSMB/RC.pm index 48f184cd..48f184cd 100755..100644 --- a/LedgerSMB/RC.pm +++ b/LedgerSMB/RC.pm diff --git a/LedgerSMB/RP.pm b/LedgerSMB/RP.pm index f778ae67..f778ae67 100755..100644 --- a/LedgerSMB/RP.pm +++ b/LedgerSMB/RP.pm diff --git a/LedgerSMB/Session.pm b/LedgerSMB/Session.pm index 76ed27ce..76ed27ce 100755..100644 --- a/LedgerSMB/Session.pm +++ b/LedgerSMB/Session.pm diff --git a/LedgerSMB/Sysconfig.pm b/LedgerSMB/Sysconfig.pm index 1d653465..bfb9c890 100644 --- a/LedgerSMB/Sysconfig.pm +++ b/LedgerSMB/Sysconfig.pm @@ -70,7 +70,8 @@ my %config; read_config('ledgersmb.conf' => %config) or die; # Root variables -for $var (qw(pathsep logging check_max_invoices language session latex)){ +for $var (qw(pathsep logging check_max_invoices language session latex + db_autoupdate)){ ${$var} = $config{''}{$var} if $config{''}{$var}; } diff --git a/LedgerSMB/Tax.pm b/LedgerSMB/Tax.pm index 6d4c7956..6d4c7956 100755..100644 --- a/LedgerSMB/Tax.pm +++ b/LedgerSMB/Tax.pm diff --git a/LedgerSMB/User.pm b/LedgerSMB/User.pm index 71199a1a..71199a1a 100755..100644 --- a/LedgerSMB/User.pm +++ b/LedgerSMB/User.pm |