diff options
author | Jim Meyering <jim@meyering.net> | 2003-08-26 07:19:57 +0000 |
---|---|---|
committer | Jim Meyering <jim@meyering.net> | 2003-08-26 07:19:57 +0000 |
commit | fb980e53f9ae726a2c2193ee3dfd748072bffa71 (patch) | |
tree | c8b05ae22061315bf56718d7e106d723e069e3b6 | |
parent | 19ef24661fb2d7463cba6f2dba3df6f06efb54a0 (diff) | |
download | coreutils-fb980e53f9ae726a2c2193ee3dfd748072bffa71.tar.xz |
(print_changelog_deltas): Neutralize "<#" as
"<\#" to avoid magic from Gnus when posting parts of this script.
-rwxr-xr-x | announce-gen | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/announce-gen b/announce-gen index 1b4acfdd7..eff372b2c 100755 --- a/announce-gen +++ b/announce-gen @@ -6,7 +6,7 @@ use Getopt::Long; use Digest::MD5; use Digest::SHA1; -(my $VERSION = '$Revision: 1.16 $ ') =~ tr/[0-9].//cd; +(my $VERSION = '$Revision: 1.17 $ ') =~ tr/[0-9].//cd; (my $ME = $0) =~ s|.*/||; my %valid_release_types = map {$_ => 1} qw (alpha beta major); @@ -226,11 +226,13 @@ sub print_changelog_deltas ($$) $fail and exit 1; + # The markup is escaped as <\# so that when this script is sent by + # mail (or part of a diff), Gnus is not triggered. print <<EOF; Subject: $my_distdir released -<#secure method=pgpmime mode=sign> +<\#secure method=pgpmime mode=sign> FIXME: put comments here @@ -263,8 +265,10 @@ EOF print "\nHere are the MD5 and SHA1 signatures:\n"; print "\n"; - print "<#part type=text/plain filename=\"$tmp\" disposition=inline>\n" - . "<#/part>\n"; + # The markup is escaped as <\# so that when this script is sent by + # mail (or part of a diff), Gnus is not triggered. + print "<\#part type=text/plain filename=\"$tmp\" disposition=inline>\n" + . "<\#/part>\n"; open OUT, '>', $tmp or die "$ME: $tmp: cannot open for writing: $!\n"; |