[Bio] / Sprout / ERDBObject.pm Repository:
ViewVC logotype

Diff of /Sprout/ERDBObject.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5, Tue Feb 5 04:54:38 2008 UTC revision 1.6, Tue Sep 16 18:54:43 2008 UTC
# Line 518  Line 518 
518              $fieldHash{$fieldKey} = [$realValue];              $fieldHash{$fieldKey} = [$realValue];
519              Trace("$fieldKey = '$thisValue'") if T(Fields => 3);              Trace("$fieldKey = '$thisValue'") if T(Fields => 3);
520          }          }
         # Save the new-object flag.  
         $newObjectFlag = shift @values;  
521      }      }
522      # Create the result object.      # Create the result object.
523      my $self = { _db => $database, _targetEntity => $target, _values => \%fieldHash,      my $self = { _db => $database, _targetEntity => $target, _values => \%fieldHash };
                  _newObjectFlag => $newObjectFlag };  
524      # Bless and return it.      # Bless and return it.
525      bless $self;      bless $self;
526      return $self;      return $self;

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3