Revision 07be726d
Von Sven Schöling vor fast 18 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 959 | 959 |
# Database routines used throughout |
| 960 | 960 |
|
| 961 | 961 |
sub dbconnect {
|
| 962 |
$main::lxdebug->enter_sub(); |
|
| 962 |
$main::lxdebug->enter_sub(2);
|
|
| 963 | 963 |
|
| 964 | 964 |
my ($self, $myconfig) = @_; |
| 965 | 965 |
|
| ... | ... | |
| 974 | 974 |
$dbh->do($myconfig->{dboptions}) || $self->dberror($myconfig->{dboptions});
|
| 975 | 975 |
} |
| 976 | 976 |
|
| 977 |
$main::lxdebug->leave_sub(); |
|
| 977 |
$main::lxdebug->leave_sub(2);
|
|
| 978 | 978 |
|
| 979 | 979 |
return $dbh; |
| 980 | 980 |
} |
Auch abrufbar als: Unified diff
Eine Funktion auf Tracelevel 2 gesetzt