Bump copyright years for user-visible copyright messages

* module/ice-9/command-line.scm (version-etc):
* module/scripts/compile.scm (show-version):
* module/system/repl/common.scm (*version*): Bump to 2021.

diff --git a/module/ice-9/command-line.scm b/module/ice-9/command-line.scm
index 711ac4ac6cf95b0a9b907c571091ad860f0de89b..a0a1a35d996db2b280340c8c3fa912c321a278d6 100644 (file)
--- a/module/ice-9/command-line.scm
+++ b/module/ice-9/command-line.scm
@@ -1,6 +1,6 @@
 ;;; Parsing Guile's command-line
 
-;;; Copyright (C) 1994-1998, 2000-2020 Free Software Foundation, Inc.
+;;; Copyright (C) 1994-1998, 2000-2021 Free Software Foundation, Inc.
 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
@@ -66,7 +66,7 @@ There is NO WARRANTY, to the extent permitted by law."))
 (define* (version-etc package version #:key
                       (port (current-output-port))
                       ;; FIXME: authors
-                      (copyright-year 2020)
+                      (copyright-year 2021)
                       (copyright-holder "Free Software Foundation, Inc.")
                       (copyright (format #f "Copyright (C) ~a ~a"
                                          copyright-year copyright-holder))

diff --git a/module/scripts/compile.scm b/module/scripts/compile.scm
index eadd38bf236261308671ced9db9814e90a4b7a50..a9e6873af08b8da4e7ec36ccf16f9f602c87e552 100644 (file)
--- a/module/scripts/compile.scm
+++ b/module/scripts/compile.scm
@@ -160,7 +160,7 @@ options."
 
 (define (show-version)
   (format #t "compile (GNU Guile) ~A~%" (version))
-  (format #t "Copyright (C) 2020 Free Software Foundation, Inc.
+  (format #t "Copyright (C) 2021 Free Software Foundation, Inc.
 License LGPLv3+: GNU LGPL version 3 or later <http://gnu.org/licenses/lgpl.html>.
 This is free software: you are free to change and redistribute it.
 There is NO WARRANTY, to the extent permitted by law.~%"))

diff --git a/module/system/repl/common.scm b/module/system/repl/common.scm
index 155bc7acb420291b7523a9932c59820a1c93bfc1..29ae104c5286165fcf225a30b90365f388e89384 100644 (file)
--- a/module/system/repl/common.scm
+++ b/module/system/repl/common.scm
@@ -1,6 +1,6 @@
 ;;; Repl common routines
 
-;; Copyright (C) 2001, 2008-2016, 2019-2020  Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2008-2016, 2019-2021  Free Software Foundation, Inc.
 
 ;;; This library is free software; you can redistribute it and/or
 ;;; modify it under the terms of the GNU Lesser General Public
@@ -40,7 +40,7 @@
 
 (define *version*
   (format #f "GNU Guile ~A
-Copyright (C) 1995-2020 Free Software Foundation, Inc.
+Copyright (C) 1995-2021 Free Software Foundation, Inc.
 
 Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'.
 This program is free software, and you are welcome to redistribute it