On Feb 8, 2007, at 5:58 PM, John Siracusa wrote:

> On 2/8/07 5:54 PM, Jonathan Vanasco wrote:
>>> Er, that's a "it already is a get/set method in the latest version."
>>
>> http://search.cpan.org/~jsiracusa/Rose-DB-Object/lib/Rose/DB/
>> Object.pm#dbh
>
> Oh, *that* dbh :)  That's some old, probably now inappropriate  
> code.  I'll
> change it to what the docs say it should be: a proxy for db->dbh()

actually, how do you feel about this replacement routine?

sub dbh
{
    my($self,$new_dbh) = shift;

    my $db = $self->db or return 0;

        if ( defined $new_dbh )
        {
                $db->dbh( $new_dbh );
        }

    if(my $dbh = $db->dbh)
    {
      return $dbh;
    }
    else
    {
      $self->error($db->error);
      $self->meta->handle_error($self);
      return undef;
    }
}

which makes it get-set -- and in terms of the db object.
plus i killed the internal caching you did, which made no sense to me.

diff-wise, it would be:

sub dbh
{
-   my($self) = shift;
+  my($self,$new_dbh) = shift;

-   return $self->{'dbh'}  if($self->{'dbh'});

    my $db = $self->db or return 0;

+       if ( defined $new_dbh )
+       {
+               $db->dbh( $new_dbh );
+       }

    if(my $dbh = $db->dbh)
    {
-     return $self->{'dbh'} = $dbh;
      return $dbh;
    }
    else
    {
      $self->error($db->error);
      $self->meta->handle_error($self);
      return undef;
    }
}










// Jonathan Vanasco

| - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  
- - - - - - - - - - - - - - - - - - -
| SyndiClick.com
| - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  
- - - - - - - - - - - - - - - - - - -
|      FindMeOn.com - The cure for Multiple Web Personality Disorder
|      Web Identity Management and 3D Social Networking
| - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  
- - - - - - - - - - - - - - - - - - -
|      RoadSound.com - Tools For Bands, Stuff For Fans
|      Collaborative Online Management And Syndication Tools
| - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  
- - - - - - - - - - - - - - - - - - -



-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier.
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Rose-db-object mailing list
Rose-db-object@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/rose-db-object

Reply via email to