--- trunk/Estraier.pm	2006/01/28 16:43:45	93
+++ trunk/Estraier.pm	2006/01/28 18:19:47	97
@@ -92,7 +92,8 @@
 =cut
 
 sub _s {
-	my $text = $_[1] || return;
+	my $text = $_[1];
+	return unless defined($text);
 	$text =~ s/\s\s+/ /gs;
 	$text =~ s/^\s+//;
 	$text =~ s/\s+$//;
@@ -320,7 +321,7 @@
 	my $draft;
 
 	foreach my $attr_name (sort keys %{ $self->{attrs} }) {
-		next unless(my $v = $self->{attrs}->{$attr_name});
+		next unless defined(my $v = $self->{attrs}->{$attr_name});
 		$draft .= $attr_name . '=' . $v . "\n";
 	}