When quilt linearisation fails, print the right information in the error message. (This has been broken forever.)

1 files changed, 1 insertions, 1 deletions

diff --git a/dgit b/dgit
index 916177c..7c76a6f 100755
--- a/dgit
+++ b/dgit
@@ -2627,7 +2627,7 @@ sub quiltify ($$) {
 	my $abbrev = sub {
 	    my $x = $_[0]{Commit};
 	    $x =~ s/(.*?[0-9a-z]{8})[0-9a-z]*$/$1/;
-	    return $;
+	    return $x;
 	};
 	my $reportnot = sub {
 	    my ($notp) = @_;