From acdb21f94d642417bef845041122a168ff64c4a5 Mon Sep 17 00:00:00 2001
From: ยท๐๐ด๐๐๐ฉ๐ค
Date: Wed, 10 Dec 2025 13:00:27 +0000
Subject: add banners! โง
---
lib/banner.ml | 7 +++++++
lib/lock_loader.ml | 5 +++--
lib/manifest.ml | 7 +++++++
lib/nixtamal.ml | 1 +
4 files changed, 18 insertions(+), 2 deletions(-)
create mode 100644 lib/banner.ml
(limited to 'lib')
diff --git a/lib/banner.ml b/lib/banner.ml
new file mode 100644
index 0000000..6168b10
--- /dev/null
+++ b/lib/banner.ml
@@ -0,0 +1,7 @@
+(*โโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโ
+โ SPDX-FileCopyrightText: 2025 toastal โ
+โ SPDX-License-Identifier: LGPL-2.1-or-later WITH OCaml-LGPL-linking-exception โ
+โโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโโ*)
+let pp ppf = Fmt.pf ppf {|โโโป+โป โฑโโณโโโโโณโโโโป@.โโโโโโโโนโโนโฃโซโโโโฃโซโ@.โนโโโนโฑ โน โน โนโนโน โนโนโนโโ|}
+
+let show = Fmt.str "%t" pp
diff --git a/lib/lock_loader.ml b/lib/lock_loader.ml
index 98e86e3..6dcb233 100644
--- a/lib/lock_loader.ml
+++ b/lib/lock_loader.ml
@@ -82,8 +82,9 @@ let pp_banner (ppf : Format.formatter) =
pf ppf "PERFORMANCE@ OF@ THIS@ SOFTWARE.@]@.";
pf ppf "@.";
pf ppf "%a@." Fmt.string hr;
- pf ppf "@[This file was generated by Nixtamal.@;";
- pf ppf "Do not edit as it will be overwritten.@]@.";
+ pf ppf "โโโป+โป โฑโโณโโโโโณโโโโป@.";
+ pf ppf "โโโโโโโโนโโนโฃโซโโโโฃโซโ This file was generated by Nixtamal.@.";
+ pf ppf "โนโโโนโฑ โน โน โนโนโน โนโนโนโโ Do not edit as it will be overwritten.@.";
pf ppf "%a@." Fmt.string hr;
pf ppf "*/@."
diff --git a/lib/manifest.ml b/lib/manifest.ml
index 2583e74..b79ebb9 100644
--- a/lib/manifest.ml
+++ b/lib/manifest.ml
@@ -711,6 +711,13 @@ let write () : (unit, error) result =
Logs.app (fun m -> m "Writing manifest @@ %s โฆ" filename);
let result =
Eio.Path.with_open_out ~create: (`Exclusive 0o644) filepath @@ fun flow ->
+ let banner = [
+ Cstruct.of_string "// โโโป+โป โฑโโณโโโโโณโโโโป\n";
+ Cstruct.of_string "// โโโโโโโโนโโนโฃโซโโโโฃโซโ Read the manpage:\n";
+ Cstruct.of_string "// โนโโโนโฑ โน โน โนโนโน โนโนโนโโ $ man nixtamal-manifest\n";
+ ]
+ in
+ Eio.Flow.write flow banner;
Util.KDL.to_flow flow mnfst;
Eio.Flow.write flow ([Cstruct.of_string "\n"])
in
diff --git a/lib/nixtamal.ml b/lib/nixtamal.ml
index bb865f6..e45d906 100644
--- a/lib/nixtamal.ml
+++ b/lib/nixtamal.ml
@@ -91,6 +91,7 @@ let set_up ~env ?nixpkgs: nixpkgs_opt () : (unit, error) result =
let (let*) = Result.bind in
Eio.Switch.run @@ fun sw ->
let proc_mgr = Eio.Stdenv.process_mgr env in
+ Logs.app (fun m -> m "%t@." Banner.pp);
Working_directory.set_up_root ();
if Manifest.exists () then
begin
--
cgit v1.2.3