From a0a0c6a43b88d946f2b5484892cf0209bd7c0e68 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?G=C3=A1bor=20Boskovits?= <boskovits@gmail.com>
Date: Sat, 8 Dec 2018 21:25:31 +0100
Subject: [PATCH] Make idlj respect SOURCE_DATE_EPOCH.

---
 .../sun/tools/corba/se/idl/toJavaPortable/Util.java | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/src/java.corba/share/classes/com/sun/tools/corba/se/idl/toJavaPortable/Util.java b/src/java.corba/share/classes/com/sun/tools/corba/se/idl/toJavaPortable/Util.java
index 7397619f2..583d6b8e4 100644
--- a/src/java.corba/share/classes/com/sun/tools/corba/se/idl/toJavaPortable/Util.java
+++ b/src/java.corba/share/classes/com/sun/tools/corba/se/idl/toJavaPortable/Util.java
@@ -1146,7 +1146,18 @@ public class Util extends com.sun.tools.corba.se.idl.Util
     else
       formatter.setTimeZone (java.util.TimeZone.getDefault ());
 
-    stream.println ("* " + formatter.format (new Date ()));
+    try {
+	String epoch = System.getenv("SOURCE_DATE_EPOCH");
+	if(epoch != null) {
+	    long unixTime = Long.parseLong(epoch);
+	    stream.println ("* " + formatter.format (new Date (unixTime*1000L)));
+	} else {
+	    stream.println ("* " + formatter.format (new Date ()));
+	}
+    } catch (Exception e) {
+	//in case of error fall back to default
+	stream.println ("* " + formatter.format (new Date ()));
+    }
 
     // <daz>
     ///////////////
-- 
2.19.2

647633baa137df49c68b5'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/tests/cache.scm'>
<input type='hidden' name='id' value='27b9fe86b1baabb6520647633baa137df49c68b5'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=27b9fe86b1baabb6520647633baa137df49c68b5'>root</a>/<a href='/guix/log/tests?id=27b9fe86b1baabb6520647633baa137df49c68b5'>tests</a>/<a href='/guix/log/tests/cache.scm?id=27b9fe86b1baabb6520647633baa137df49c68b5'>cache.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/tests/cache.scm?id=27b9fe86b1baabb6520647633baa137df49c68b5&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-03-22 16:49:47 +0100'>2020-03-22</span></td><td><a href='/guix/commit/tests/cache.scm?id=9acacb71c958218fd69cf0fb9df0b439a980a0f2'>Remove workaround for 'time-monotonic' in Guile 2.2.2.</a><span class='msg-avail'>...<span class='msg-tooltip'>This is a followup to e688c2df3924423b67892cc9939ca099c729d1cb.

* build-aux/hydra/evaluate.scm &lt;top level&gt;: Remove 'time-monotonic'
definition.
* guix/cache.scm: Likewise.
* guix/progress.scm: Likewise.
* guix/scripts/substitute.scm: Likewise.
* guix/scripts/weather.scm: Likewise.
* tests/cache.scm: Likewise.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-04-22 14:42:15 +0200'>2017-04-22</span></td><td><a href='/guix/commit/tests/cache.scm?id=25a49294caf2386e65fc1b12a2508324be0b1cc2'>cache: Work around 'time-monotonic' bug in Guile 2.2.2.</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/cache.scm (time-monotonic) [guile-2.2]: New variable.
* tests/cache.scm (time-monotonic) [guile-2.2]: Likewise.
* guix/build/download.scm (time-monotonic) [guile-2.2]: Adjust comment:
it's a 2.2.2 bug.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-04-18 23:19:30 +0200'>2017-04-18</span></td><td><a href='/guix/commit/tests/cache.scm?id=2ea2aac6e9d58a07c029504f94fb5015cd407e31'>Add (guix cache) and use it in (guix scripts substitute).</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/cache.scm, tests/cache.scm: New files.
* Makefile.am (MODULES, SCM_TESTS): Add them.
* guix/scripts/substitute.scm (obsolete?): Remove.
(remove-expired-cached-narinfos): Rename to...
(cached-narinfo-expiration-time): ... this.  Remove the removal part and
only keep the expiration time part.
(narinfo-cache-directories): Add optional 'directory' parameter and
honor it.
(maybe-remove-expired-cached-narinfo): Remove.
(cached-narinfo-files): New procedure.
(guix-substitute): Use 'maybe-remove-expired-cache-entries' instead of
'maybe-remove-expired-cached-narinfo'.
</span></span></td><td>Ludovic Courtès</td></tr>