[Jifty-commit] r4235 - in jifty/trunk: bin
jifty-commit at lists.jifty.org
jifty-commit at lists.jifty.org
Thu Oct 11 16:07:53 EDT 2007
Author: falcone
Date: Thu Oct 11 16:07:49 2007
New Revision: 4235
Modified:
jifty/trunk/ (props changed)
jifty/trunk/bin/generate-changelog
Log:
r25364 at ketch: falcone | 2007-10-11 16:06:15 -0400
* add an exclude command for logs you don't need to ship
Modified: jifty/trunk/bin/generate-changelog
==============================================================================
--- jifty/trunk/bin/generate-changelog (original)
+++ jifty/trunk/bin/generate-changelog Thu Oct 11 16:07:49 2007
@@ -70,6 +70,7 @@
open (my $fh, ">$dest") or die "Can't open $dest for writing";
foreach my $key ( keys %entries) {
+ next if $key eq 'exclude';
my $title = $key;
$title =~ s/^\w\-//;
print $fh uc($key)."\n";
@@ -112,6 +113,7 @@
elsif ($in eq 'e') { $command = 'edit'; }
elsif ($in eq 'q') { $command = 'quit'; }
elsif ($in eq 't') { $command = 'tag' }
+ elsif ($in eq 'x') { $command = 'exclude' }
elsif ($in eq ' ') {
return
}
@@ -134,8 +136,9 @@
system( ( $ENV{EDITOR} || 'vi' ), $filename );
$entry->{'edited_msg'} = read_file($filename);
} elsif ($command eq 'quit') {
-
do_quit();
+ } elsif ($command eq 'exclude') {
+ $entry->{section} = 'exclude';
}
}
More information about the Jifty-commit
mailing list