--- lib/Authen/Htpasswd.pm	2008-10-01 16:05:48.000000000 +0200
+++ lib/Authen/Htpasswd.pm.oden	2008-10-01 16:07:36.000000000 +0200
@@ -220,7 +220,7 @@
     my ($old,$new) = $self->_start_rewrite;
     while (defined(my $line = <$old>)) {
         if ($line =~ /^\Q$username\E\:/) {
-            $self->_abort_rewrite;
+            $self->_abort_rewrite($old, $new);
             croak "user $username already exists in " . $self->file . "!";
         }
         $self->_print( $new, $line );