projects
/
dbsrgits/DBIx-Class.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Whoops, missed a line
[dbsrgits/DBIx-Class.git]
/
lib
/
DBIx
/
Class
/
Ordered.pm
diff --git
a/lib/DBIx/Class/Ordered.pm
b/lib/DBIx/Class/Ordered.pm
index
be06d3b
..
ed726de
100644
(file)
--- a/
lib/DBIx/Class/Ordered.pm
+++ b/
lib/DBIx/Class/Ordered.pm
@@
-471,6
+471,7
@@
sub move_to_group {
my @original_values = $cursor->next;
$self->set_inflated_columns ({ %values, map { $_ => shift @original_values } (@dirty_cols) });
+ delete $self->{_dirty_columns}{$_} for (@dirty_cols);
}
if ($self->_is_in_group ($to_group) ) {