Changeset 22821
- Timestamp:
- 09/09/10 10:32:15 (17 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/mnw21/pathquery_refactor/intermine/perl/lib/InterMine/Item.pm
r22534 r22821 172 172 if (ref $value eq 'ARRAY') { 173 173 if ( not $field->isa('InterMine::Model::Collection') ) { 174 die "tried to set field '$name' in class '", $self->to_string(), 175 "' to something other than type: ", ref $field, "\n"; 174 die "tried to set field '$name' in class '", 175 $self->to_string(), 176 "' to something other than type: ", 177 ref $field, "\n"; 176 178 } 177 179 … … 182 184 183 185 push @{$self->{$name}}, $_ for @items; 184 185 186 186 187 my $collection_hash_name = _get_collection_hash_name($name); … … 199 200 $other_item->set($field->reverse_reference_name(), $self); 200 201 } 201 # } else {202 # if ($field->is_many_to_many()) {203 # $other_item->_add_to_collection($field->reverse_reference_name(), $self);204 # }205 202 } 206 207 203 } else { 208 204 die "collection '$name' in class '", $self->to_string(), … … 220 216 if (!defined $self->{$name} || $self->{$name} != $value) { 221 217 $self->{$name} = $value; 222 223 #if ($field->is_many_to_one()) {224 # add this Item to the collection in the other Item225 # $value->_add_to_collection($field->reverse_reference_name(), $self);226 #}227 218 } 228 219 }
Note: See TracChangeset
for help on using the changeset viewer.
