From ed030ecb18a165e924e1c8f4ab25cd3d95689665 Mon Sep 17 00:00:00 2001
From: Simon Tournier <zimon.toutoune@gmail.com>
Date: Wed, 24 Jul 2024 23:23:10 +0200
Subject: [PATCH] gnu: mawk: Add symlink to 'awk'.

* gnu/packages/gawk.scm (mawk)[arguments]: Modify phases to add symlink from
'mawk' to 'awk'.

Reported-by: Zack Weinberg
Change-Id: I98e65bf895db9a5a3f36419574fcc21f92a979fc
Closes: 72280@debbugs.gnu.org
---
 gnu/packages/gawk.scm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/gawk.scm b/gnu/packages/gawk.scm
index 72794b025b..6223fd0273 100644
--- a/gnu/packages/gawk.scm
+++ b/gnu/packages/gawk.scm
@@ -4,6 +4,7 @@
 ;;; Copyright © 2018, 2022-2024 Efraim Flashner <efraim@flashner.co.il>
 ;;; Copyright © 2021, 2022 Marius Bakke <marius@gnu.org>
 ;;; Copyright © 2022 Paul A. Patience <paul@apatience.com>
+;;; Copyright © 2024 Simon Tournier <zimon.toutoune@gmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -164,7 +165,14 @@ block-scoped lexical variables."))))
                      ""))))))
     (build-system gnu-build-system)
     (arguments
-     (list #:parallel-build? #f))   ; Prevent a race condition.
+     (list
+      #:parallel-build? #f              ; Prevent a race condition.
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'symlink-awk
+            (lambda _
+              (with-directory-excursion (string-append #$output "/bin")
+                (symlink "mawk" "awk")))))))
     (native-inputs
      (list bison))
     (synopsis "Text scanning and processing language")