--- trunk/Estraier.pm	2006/01/04 15:28:39	9
+++ trunk/Estraier.pm	2006/01/04 15:50:08	11
@@ -182,7 +182,7 @@
 sub texts {
 	my $self = shift;
 	confess "attr_names return array, not scalar" if (! wantarray);
-	return $self->{dtexts};
+	return @{ $self->{dtexts} };
 }
 
 =head2 dump_draft
@@ -210,6 +210,8 @@
 		delete($self->{$data});
 	}
 
+	$self->{id} = -1;
+
 	return 1;
 }