Explicit setters for (curr|prev|first)_ts.

This commit is contained in:
Brian Fraser
2012-01-10 13:40:51 -03:00
parent 9fd8e8d61d
commit 25909caa4e
3 changed files with 33 additions and 26 deletions

View File

@@ -64,7 +64,7 @@ sub group_by_all {
},
map( { ($_ => $args{$_}) } qw(filehandle filename data) ),
);
if (!$self->prev_ts) {
if (!$self->prev_ts()) {
seek $args{filehandle}, $orig, 0;
}
return;