r55959 - /scripts/patchedit

[potyl-guest at users.alioth.debian.org]

Author: potyl-guest
Date: Sun Apr 11 15:42:36 2010
New Revision: 55959

URL: http://svn.debian.org/wsvn/?sc=1&rev=55959
Log:
Print the bug-* section after the main bug section

Modified:
    scripts/patchedit

Modified: scripts/patchedit
URL: http://svn.debian.org/wsvn/scripts/patchedit?rev=55959&op=diff
==============================================================================
--- scripts/patchedit (original)
+++ scripts/patchedit Sun Apr 11 15:42:36 2010
@@ -200,13 +200,13 @@
 	
 	open(my $patch_fh, '>', $patch) or die 'failed to open "'.$patch.'" - '.$!;
 	foreach my $key (@standard_fields) {
+		print $patch_fh $key, ': ', $patch_content->{$key}
+			if $patch_content->{$key};
 		if ($key eq 'Bug') {
 			foreach my $key (grep { m/Bug-/ } sort keys %{$patch_content}) {
 				print $patch_fh $key, ': ', $patch_content->{$key};
 			}
 		}
-		print $patch_fh $key, ': ', $patch_content->{$key}
-			if $patch_content->{$key};
 	}
 	print $patch_fh "\n";
 	print $patch_fh $patch_content->{'_patch'};