diff options
| -rw-r--r-- | ChangeLog | 6 | ||||
| -rwxr-xr-x | build-aux/announce-gen | 5 |
2 files changed, 9 insertions, 2 deletions
@@ -1,3 +1,9 @@ +2012-03-20 Reuben Thomas <rrt@sc3d.org> + + announce-gen: use Digest::SHA when possible + * build-aux/announce-gen: Use Digest::SHA when possible, falling + back to Digest::SHA1 if necessary. + 2012-03-20 Jim Meyering <meyering@redhat.com> tests: avoid gcc warnings about argv vs. const initializers diff --git a/build-aux/announce-gen b/build-aux/announce-gen index 3ca90a9a08..b9c9360a73 100755 --- a/build-aux/announce-gen +++ b/build-aux/announce-gen @@ -3,7 +3,7 @@ eval '(exit $?0)' && eval 'exec perl -wS "$0" ${1+"$@"}' if 0; # Generate a release announcement message. -my $VERSION = '2012-01-06 07:46'; # UTC +my $VERSION = '2012-03-20 23:17'; # UTC # The definition above must lie within the first 8 lines in order # for the Emacs time-stamp write hook (at end) to update it. # If you change this file with Emacs, please let the write hook @@ -30,7 +30,8 @@ use strict; use Getopt::Long; use Digest::MD5; -use Digest::SHA1; +eval { require Digest::SHA; } + or eval { use Digest::SHA1; }; use POSIX qw(strftime); (my $ME = $0) =~ s|.*/||; |