1 files changed, 2 insertions, 1 deletions
diff --git a/URI/_generic.pm b/URI/_generic.pm
index 979087b..d332756 100644
--- a/URI/_generic.pm
+++ b/URI/_generic.pm
@@ -148,7 +148,8 @@ sub abs
 	my $abs = $base->clone;
 	my $query = $self->query;
 	$abs->query($query) if defined $query;
-	$abs->fragment($self->fragment);
+	my $fragment = $self->fragment;
+	$abs->fragment($fragment) if defined $fragment;
 	return $abs;
     }