r24668 - in /scripts/KGB: TODO client/KGB_sendcommit
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Wed Aug 27 13:41:10 UTC 2008
Author: dmn
Date: Wed Aug 27 13:41:08 2008
New Revision: 24668
URL: http://svn.debian.org/wsvn/?sc=1&rev=24668
Log:
shorten the (M+) flags, stick paths to the flags to avoid wrapping
Modified:
scripts/KGB/TODO
scripts/KGB/client/KGB_sendcommit
Modified: scripts/KGB/TODO
URL: http://svn.debian.org/wsvn/scripts/KGB/TODO?rev=24668&op=diff
==============================================================================
--- scripts/KGB/TODO (original)
+++ scripts/KGB/TODO Wed Aug 27 13:41:08 2008
@@ -20,11 +20,6 @@
/trunk/libuniversal-isa-perl/t/basic.t (M+ )
/trunk/libuniversal-isa-perl/Changes) New upstream release
-* make the modification flags ("(M+ )") 'stick' to the file name so that
- wrapping does not leave the flags and the files on different lines (as
- above)
-* Investigate what the "+" means in the flags and why there is a
- trailing space before the closing paren
* highlight branch name
* 14:58 < sgran> can you split one message per line?
14:59 < dam> sgran: you mean, one message for each file changed, plus one
Modified: scripts/KGB/client/KGB_sendcommit
URL: http://svn.debian.org/wsvn/scripts/KGB/client/KGB_sendcommit?rev=24668&op=diff
==============================================================================
--- scripts/KGB/client/KGB_sendcommit (original)
+++ scripts/KGB/client/KGB_sendcommit Wed Aug 27 13:41:08 2008
@@ -82,9 +82,10 @@
} elsif($k == $SVN::Fs::PathChange::delete) {
$k = "D";
}
- my $pm = $changed->{$_}->prop_mod() ? "+" : " ";
- my $tm = $changed->{$_}->text_mod() ? "+" : " ";
- push @changed, "($k$tm$pm) $_";
+ my $pm = $changed->{$_}->prop_mod() ? "+" : "";
+ my $tm = $changed->{$_}->text_mod() ? "+" : "";
+ $k = "" unless $tm or $k = "A";
+ push @changed, "($k$pm)$_";
}
#utf8::encode($aut);
#utf8::encode($log);
More information about the Pkg-perl-cvs-commits
mailing list