[perl-Glib] lib/Glib/GenPod.pm: Allow overriding of current time in generated man-pages

[Brian Manning <bmanning src gnome org>]

commit bd76e8dce3ce22e0d70b44940c150076f948a46b
Author: Brian Manning <bmanning src gnome org>
Date:   Wed Jul 12 16:34:48 2017 -0700

    lib/Glib/GenPod.pm: Allow overriding of current time in generated man-pages
    
    - (RT#122140) Allow overriding of current time in order to make it easy
      to build distribution packages of software like Goo::Canvas in a
      reproducible way; see https://reproducible-builds.org/ for why this
      matters, and
      https://reproducible-builds.org/specs/source-date-epoch/ for the
      definition of this variable.  Many thanks to Bernhard Wiedemann for
      the patch.

 lib/Glib/GenPod.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/lib/Glib/GenPod.pm b/lib/Glib/GenPod.pm
index 0edf31a..14ca93a 100644
--- a/lib/Glib/GenPod.pm
+++ b/lib/Glib/GenPod.pm
@@ -40,7 +40,7 @@ our @EXPORT = qw(
 our $COPYRIGHT = undef;
 our $AUTHORS = 'Gtk2-Perl Team';
 our $MAIN_MOD = undef;
-our $YEAR = strftime "%Y", gmtime;
+our $YEAR = strftime "%Y", gmtime($ENV{SOURCE_DATE_EPOCH} || time);
 
 our ($xspods, $data);