Revision 085830e6
Von Moritz Bunkus vor etwa 18 Jahren hinzugefügt
| SL/User.pm | ||
|---|---|---|
| 57 | 57 |
# remove any trailing whitespace |
| 58 | 58 |
s/^\s*(.*?)\s*$/$1/; |
| 59 | 59 |
|
| 60 |
($key, $value) = split /=/, $_, 2;
|
|
| 60 |
($key, $value) = split(/=/, $_, 2);
|
|
| 61 | 61 |
|
| 62 | 62 |
if (($key eq "stylesheet") && ($value eq "sql-ledger.css")) {
|
| 63 | 63 |
$value = "lx-office-erp.css"; |
| ... | ... | |
| 496 | 496 |
|
| 497 | 497 |
while (<FH>) {
|
| 498 | 498 |
if (/^dbname=/) {
|
| 499 |
my ($null, $item) = split /=/;
|
|
| 499 |
my ($null, $item) = split(/=/);
|
|
| 500 | 500 |
push @dbexcl, $item; |
| 501 | 501 |
} |
| 502 | 502 |
} |
Auch abrufbar als: Unified diff
Syntaxhighlighting fuer Emacs erleichtert.