Revision 1aa5f1b3
Von Moritz Bunkus vor mehr als 14 Jahren hinzugefügt
| SL/LXDebug.pm | ||
|---|---|---|
| 24 | 24 |
|
| 25 | 25 |
our $global_level; |
| 26 | 26 |
our $watch_form; |
| 27 |
our $file_name; |
|
| 27 | 28 |
|
| 28 | 29 |
BEGIN {
|
| 29 | 30 |
eval("use Data::Dumper");
|
| ... | ... | |
| 38 | 39 |
my $self = {};
|
| 39 | 40 |
|
| 40 | 41 |
$self->{"calldepth"} = 0;
|
| 41 |
$self->{"file"} = "/tmp/lx-office-debug.log";
|
|
| 42 |
$self->{"file"} = $file_name || "/tmp/lx-office-debug.log";
|
|
| 42 | 43 |
$self->{"target"} = FILE_TARGET;
|
| 43 | 44 |
$self->{"level"} = 0;
|
| 44 | 45 |
|
Auch abrufbar als: Unified diff
Möglichkeit, den Dateinamen für Debugmeldungen zu ändern.