This is a diff against the latest cvs2cl, version 2.46. It makes it
work how we require for cvslog. There's no new features, it's just a
new diff covering all the previous alterations on 2.38.
Oh, and it's a unified diff, which is much more readable :-)
--- cvs2cl.orig Mon May 12 14:12:50 2003
+++ cvs2cl Mon May 12 14:13:14 2003
@@ -879,7 +879,8 @@
elsif ($No_Wrap)
{
$msg = &preprocess_msg_text ($msg);
- $files = wrap ("\t", " ", "$files");
+# tdb: no-wrap shouldn't wrap ANYTHING!
+ #$files = wrap ("\t", " ", "$files");
$msg =~ s/\n(.*)/\n\t$1/g;
unless ($After_Header eq " ") {
$msg =~ s/^(.*)/\t$1/g;
@@ -1042,7 +1043,8 @@
# Keep track of whether all the files in this commit were in the
# same directory, and memorize it if so. We can make the output a
# little more compact by mentioning the directory only once.
- if ((scalar (@qunkrefs)) > 1)
+# tdb: hacked to turn off the commondir feature
+ if ((scalar (@qunkrefs)) < 0)
{
if (! (defined ($common_dir)))
{
@@ -1086,7 +1088,8 @@
# there are multiple qunks in the first place!
if ((scalar (@qunkrefs)) > 1) {
foreach my $tag (keys (%non_unanimous_tags)) {
- my $everyone_has_this_tag = 1;
+# tdb: we don't want to have unanimous tags
+ my $everyone_has_this_tag = 0;
foreach my $qunkref (@qunkrefs) {
if ((! (defined ($$qunkref{'tags'})))
or (! (grep ($_ eq $tag, @{$$qunkref{'tags'}})))) {
@@ -1237,7 +1240,8 @@
next if (defined ($$qunkref{'printed'})); # skip if already printed
if ($fbegun) {
- $beauty .= ", ";
+# tdb: hacked to put a newline after each one
+ $beauty .= ",\n";
}
else {
$fbegun = 1;
@@ -1286,7 +1290,8 @@
# todo: still have to take care of branch_roots?
- $beauty = "* $beauty:";
+# tdb: hacked to remove the prefixed *
+ $beauty = "$beauty:";
return $beauty;
}