+foreach my $fn ($srctar_file, $pattar_file, $diff_file) {
+ unlink("$fn.asc");
+ open(GPG, '|-', "gpg --batch --passphrase-fd=0 -ba $fn") or die $!;
+ print GPG $passphrase, "\n";
+ close GPG;
+}
+
+if (!$pre) {
+ system "rm $dest/rsync-*.gz $dest/rsync-*.asc $dest/rsync-*-NEWS $dest/src-previews/rsync-*diffs.gz*";
+
+ foreach my $fn ($srctar_file, "$srctar_file.asc",
+ $pattar_file, "$pattar_file.asc",
+ $diff_file, "$diff_file.asc", $news_file) {
+ (my $top_fn = $fn) =~ s#/src(-\w+)?/#/#;
+ link($fn, $top_fn);
+ }
+}
+
+print $break, <<'EOT';
+
+Local changes are done. When you're satisfied, push the git repository
+and rsync the release files. Remember to announce the release on *BOTH*
+rsync-announce@lists.samba.org and rsync@lists.samba.org (and the web)!
+EOT
+
+exit;