Lines 170-175
Link Here
|
170 |
$option1->option('databaseName', $server->{db}); |
170 |
$option1->option('databaseName', $server->{db}); |
171 |
$option1->option('user', $server->{userid} ) if $server->{userid}; |
171 |
$option1->option('user', $server->{userid} ) if $server->{userid}; |
172 |
$option1->option('password', $server->{password}) if $server->{password}; |
172 |
$option1->option('password', $server->{password}) if $server->{password}; |
|
|
173 |
$option1->option('charset', 'UTF-8') if $server->{encoding} eq 'utf8'; |
173 |
$option1->option('preferredRecordSyntax', $server->{syntax}); |
174 |
$option1->option('preferredRecordSyntax', $server->{syntax}); |
174 |
$oConnection[$s] = create ZOOM::Connection($option1) |
175 |
$oConnection[$s] = create ZOOM::Connection($option1) |
175 |
|| $DEBUG |
176 |
|| $DEBUG |