s{
\$Format:\%d\$
}{
- my $tag = fix(`git describe --match="bup-*"`);
- "(tag: $tag)"
+ my $tag = fix(`git describe --match="[0-9]*"`);
+ "(tag: bup-$tag)"
}ex;
s{
\$Format:([^\$].*)\$
}{
- fix(`git log -1 --format="$1"`)
+ fix(`git log -1 --pretty=format:"$1"`)
}ex;
print;
}