+ # Do not create a new version of the document if file size of last version is the same.
+ if ($params{new_version}) {
+ my $last_file_size = $last->size;
+ my $new_file_size;
+ if ($params{file}) {
+ croak 'No valid file' unless -f $params{file};
+ $new_file_size = (stat($params{file}))[7];
+ } else {
+ $new_file_size = length(${ $params{data} });
+ }
+ $params{new_version} = 0 if $last_file_size == $new_file_size;
+ }
+