Skip to content

Commit

Permalink
make the perl HashStore record the key of the last entry written to, …
Browse files Browse the repository at this point in the history
…can be used to have a handle on at least one entry in the hash
  • Loading branch information
rbuels committed Jan 17, 2013
1 parent 9726c76 commit 6f924fb
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions src/perl5/Bio/JBrowse/HashStore.pm
Expand Up @@ -116,6 +116,7 @@ sub set {
my $bucket = $self->_getBucket( $key );
$bucket->{data}{$key} = $value;
$bucket->{dirty} = 1;
$self->{meta}{last_changed_entry} = $key;

return $value;
}
Expand Down

0 comments on commit 6f924fb

Please sign in to comment.