From 60863e8024d7a7c6ffe4b03d33a87bdb44ab5770 Mon Sep 17 00:00:00 2001 From: Bruno Haible Date: Sun, 11 Apr 2021 14:17:13 +0200 Subject: announce-gen: Implement --version option according to GCS. * build-aux/announce-gen (copyright_year): New variable. (GetOptions): Print also a short copyright and license notice and author statement. --- build-aux/announce-gen | 18 ++++++++++++++++-- 1 file changed, 16 insertions(+), 2 deletions(-) (limited to 'build-aux/announce-gen') diff --git a/build-aux/announce-gen b/build-aux/announce-gen index 84d2d63781..daa478c8ef 100755 --- a/build-aux/announce-gen +++ b/build-aux/announce-gen @@ -35,12 +35,14 @@ eval 'exec perl -wSx "$0" "$@"' if 0; -my $VERSION = '2020-05-10 16:13'; # UTC +my $VERSION = '2021-04-11 8:42'; # 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 # do its job. Otherwise, update this string manually. +my $copyright_year = '2021'; + use strict; use Getopt::Long; use POSIX qw(strftime); @@ -413,7 +415,19 @@ sub get_tool_versions ($$) 'archive-suffix=s' => \@archive_suffixes, help => sub { usage 0 }, - version => sub { print "$ME version $VERSION\n"; exit }, + version => + sub + { + print "$ME version $VERSION\n"; + print "Copyright (C) $copyright_year Free Software Foundation, Inc.\n"; + print "License GPLv3+: GNU GPL version 3 or later .\n" + . "This is free software: you are free to change and redistribute it.\n" + . "There is NO WARRANTY, to the extent permitted by law.\n"; + print "\n"; + my $author = "Jim Meyering"; + print "Written by $author.\n"; + exit + }, ) or usage 1; my $fail = 0; -- cgit v1.2.1