ddts-script 0.4.10
Bonjour,
journal des modifications :
version 0.4.10
- change: bug fix in 0.4.9 comment in changelog
- bug fix:
- change: write right short description diff when first description line
is also changed
thanks to Michael Wiedmann for reporting this bug
La rustine est attachée, le script complet n'a pas bougé :
http://perso.wanadoo.fr/nico.bertol/ddts/ddts-script.txt
Nicolas
--
--- ddts-script_0.4.9.txt Wed Jan 9 21:32:17 2002
+++ ddts-script_0.4.10.txt Sat Jan 12 12:00:18 2002
@@ -277,7 +277,7 @@
=cut
-my $version = "0.4.9";
+my $version = "0.4.10";
# Test if configuration as been made
foreach ($tr_dir, $bug_dir, $rev_dir, $temp_dir) {
@@ -971,9 +971,12 @@
@diff = map { /^$comment\+/?$':$_ } @diff;
@diff = map { /^$comment-/?"# -$'":$_ } @diff;
$description = "";
- if ($diff[0] =~ /^# -/) {
- $description = "# -Description: $'\n";
- shift @diff;
+ if ($diff[0] =~ /^# -/) { # short desc has been modified
+ $description = "# -Description: $'\n"; # add old short desc
+ shift @diff; # remove it from list
+ my ($diff) = grep(/^[^ #]/, @diff); # get new short desc
+ @diff = grep(/^[ #]/, @diff); # keep long desc
+ unshift (@diff, $diff); # add short desc
}
$description .= "Description: ".join("\n", @diff)."\n";
} else {
Reply to: