From 9f70bca2d823b93b334ecb0f92e940d20aafc1c6 Mon Sep 17 00:00:00 2001
From: Julien Lepiller <julien@lepiller.eu>
Date: Sat, 18 Jun 2022 12:02:49 +0200
Subject: [PATCH] fix build date in binary

---
 src/magic/omake_gen_magic.ml | 12 ++----------
 1 file changed, 2 insertions(+), 10 deletions(-)

diff --git a/src/magic/omake_gen_magic.ml b/src/magic/omake_gen_magic.ml
index c2b9329..3d36c0c 100644
--- a/src/magic/omake_gen_magic.ml
+++ b/src/magic/omake_gen_magic.ml
@@ -150,7 +150,7 @@ let ir_magic = "%s"
 let obj_magic = "%s"
 let lib_dir = "%s"
 let version = "%s"
-let version_message = "OMake %s:\n    build [%s %s %d %02d:%02d:%02d %d]\n    on %s"
+let version_message = "OMake %s"
 |}
        default_save_interval
        digest_len
@@ -160,15 +160,7 @@ let version_message = "OMake %s:\n    build [%s %s %d %02d:%02d:%02d %d]\n    on
        (digest_files ".omo.magic" ".omo" omo_files)
        (String.escaped libdir)
        (String.escaped (shorten_version version))
-       (String.escaped version)
-       [|"Sun"; "Mon"; "Tue"; "Wed"; "Thu"; "Fri"; "Sat"|].(tm.tm_wday)
-       [|"Jan"; "Feb"; "Mar"; "Apr"; "May"; "Jun"; "Jul"; "Aug"; "Sep"; "Oct"; "Nov"; "Dec"|].(tm.tm_mon)
-       tm.tm_mday
-       tm.tm_hour
-       tm.tm_min
-       tm.tm_sec
-       (tm.tm_year + 1900)
-       (String.escaped (Unix.gethostname ()));
+       (String.escaped version);
   List.iter
     (fun (name,value) ->
        Printf.fprintf buf "let %s = %S\n" name value
-- 
2.36.1

</td><td class='form'><form class='right' method='get' action='/guix/log/tests/syscalls.scm'>
<input type='hidden' name='id' value='88b4dcdabe512992ae79a50fc333e4e463d91634'/><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=88b4dcdabe512992ae79a50fc333e4e463d91634'>root</a>/<a href='/guix/log/tests?id=88b4dcdabe512992ae79a50fc333e4e463d91634'>tests</a>/<a href='/guix/log/tests/syscalls.scm?id=88b4dcdabe512992ae79a50fc333e4e463d91634'>syscalls.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/syscalls.scm?id=88b4dcdabe512992ae79a50fc333e4e463d91634&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2021-10-26 12:46:27 +0200'>2021-10-26</span></td><td><a href='/guix/commit/tests/syscalls.scm?id=f87371bf3e952a211782311dad2971c8820a5150'>syscalls: Add 'openpty' and 'login-tty'.</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/build/syscalls.scm (openpty, login-pty): New procedures.
* tests/syscalls.scm ("openpty", "openpty + login-tty"): New tests.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-02-25 11:29:35 +0100'>2021-02-25</span></td><td><a href='/guix/commit/tests/syscalls.scm?id=7e9d9f28e997e7faad28cdd1c416be174d6986e7'>syscalls: Add 'mounts' and the &lt;mount&gt; record type.</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/build/syscalls.scm (&lt;mount&gt;): New record type.
(option-string-&gt;mount-flags, mount-flags)
(octal-decode, mounts): New procedures.
(mount-points): Rewrite in terms of 'mount'.
* tests/syscalls.scm ("mounts"): New test.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-06-28 23:32:52 +0200'>2020-06-28</span></td><td><a href='/guix/commit/tests/syscalls.scm?id=5e113cf4424b2746cbf3633cd2106c62b89e5b49'>tests: Do not fail when network interface aliases are present.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;https://bugs.gnu.org/42111&gt;.

* tests/syscalls.scm ("network-interface-names"): Filter interface names with
a colon.
</span></span></td><td>Marius Bakke</td></tr>
<tr><td><span title='2020-06-05 19:20:23 +0200'>2020-06-05</span></td><td><a href='/guix/commit/tests/syscalls.scm?id=ea924134f819eef072ba7df9080d39de97fd73e6'>tests: syscall: Support file-systems without extended attributes.</a><span class='msg-avail'>...<span class='msg-tooltip'>* tests/syscalls.scm (setxattr): Catch ENOTSUP that can be raised if the
file-system does not support extended user attributes.
</span></span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2020-06-02 10:24:03 +0200'>2020-06-02</span></td><td><a href='/guix/commit/tests/syscalls.scm?id=cb21c14b0ae1f4c9fcad4927e3b2eb0c06d7b018'>tests: Allow passing on systems without support for swap devices.</a><span class='msg-avail'>...<span class='msg-tooltip'>* tests/syscalls.scm ("swapon", "swapoff"): Accept ENOSYS as a valid result.

Signed-off-by: Mathieu Othacehe &lt;othacehe@gnu.org&gt;
</span></span></td><td>Simon South</td></tr>
<tr><td><span title='2020-05-14 00:48:12 +0200'>2020-05-14</span></td><td><a href='/guix/commit/tests/syscalls.scm?id=df05842332be80ed7f53022402b95cf711163b41'>syscalls: Add 'getxattr'.</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/build/syscalls.scm (getxattr): New procedure.
* tests/syscalls.scm ("getxattr, setxattr"): Test it, together with setxattr.
</span></span></td><td>Jan (janneke) Nieuwenhuizen</td></tr>