SQL Reports were broken in non-mysql
This commit is contained in:
parent
f170f246c6
commit
37367a6c9f
3 changed files with 22 additions and 4 deletions
|
|
@ -266,6 +266,23 @@ sub get {
|
|||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
=head2 getDriver ( )
|
||||
|
||||
Returns the DBI driver used by this database link
|
||||
|
||||
=cut
|
||||
|
||||
sub getDriver {
|
||||
my $self = shift;
|
||||
my $dsn = $self->get->{DNS};
|
||||
if ($dsn =~ /^dbi:(\w+):/i) {
|
||||
return $1;
|
||||
}
|
||||
return;
|
||||
}
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
=head2 getId ( )
|
||||
|
||||
Returns the ID of this database link.
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue