| CC: | "bug-Gtk2-Ex-DBI [...] rt.cpan.org" <bug-Gtk2-Ex-DBI [...] rt.cpan.org> |
| Subject: | Re: bugs |
| Date: | Wed, 18 May 2011 09:38:49 +1000 |
| To: | RAPPAZ Francois <francois.rappaz [...] unifr.ch> |
| From: | Daniel Kasak <daniel.kasak [...] 247realmedia.com> |
Ah THANKYOU :)
Actually I've *just* gotten my subversion repository back up and am
hacking on this stuff again ... after about a 3-year break. I'll merge
this stuff in today and give you an updated version.
Dan
On Tue, 2011-05-17 at 14:14 +0000, RAPPAZ Francois wrote:
Show quoted text
> Some minor bugs fund in Gtk2::Ex::DBI.pm v. 2.17
>
> Gtk2::Ex::DBI
>
> 1) When using the add method, it's the name of the primary key that
> appears in the widget, not the value. To have the value appearing, I
> changed
> DBI after line 1470
> if ( $widget ) {
> # $widget->set_text( $primary_key ); # should be
> $widget->set_text( $new_key )
>
> }
>
> 2) Depending on the mysql server, a from clause with inner join in it
> (abo INNER JOIN jrnabt ON abo.noabt = jrnabt.noabt) gives problems, and
> the statement $sth is not defined.
>
> I put the following workaround, which catch the first word of the from
> clause for the table name,
> after line 390
> eval { if ( ...pass_through) ...
> ...
> else
>
> my ($table) = ( $self->{sql}->{from}=~/^(\w+)/);
> # $sth = $self->{dbh}->column_info( undef, $self->{schema},
> $self->{sql}->{from}, '%' )
> $sth = $self->{dbh}->column_info( undef, $self->{schema}, $table, '%' )
>
> This work around was not needed when my data were on mysql 5.1.41 set up
> with xampp on my pc, but it was with mysql 5.0.51a-24 on our web server
>
>
> Gtk2::Ex::Datasheet::DBI
>
> 3) under # Now scan for each primary key item in the fieldlist
> # If we don't find them, append them to the end of the list and create a hidden column for them
> it's
> my @matches = grep( /^$primary_key_item$/, @{$self->{fieldlist}} );
>
> instead of
>
> my @matches = grep( /^$primary_key_item$/, $self->{fieldlist} );
>
>
> François