# Strip leading whitespace.
$refs =~ s/^\s+//;
- printf "%s %s %s %s %s %s\n",
- $prefix, $hash, $date, $author, $message, $refs;
+ if ($refs ne '') {
+ $refs = ' ' . $refs;
+ }
+
+ printf "%s %s %s %s%s %s\n",
+ $prefix, $hash, $date, $author, $refs, $message;
}
close $fh or die $!;