04/09: gnu: Add bash-with-syslog.

[guix-commits]

rekado pushed a commit to branch master
in repository guix.

commit 0a17eee8ebd7847085419028ce6e1f44238cb8f9
Author: Ricardo Wurmus <rekado@elephly.net>
AuthorDate: Mon Dec 20 00:33:51 2021 +0100

    gnu: Add bash-with-syslog.
    
    * gnu/packages/bash.scm (bash-with-syslog): New variable.
---
 gnu/packages/bash.scm | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/gnu/packages/bash.scm b/gnu/packages/bash.scm
index cf40ee9..7275856 100644
--- a/gnu/packages/bash.scm
+++ b/gnu/packages/bash.scm
@@ -269,6 +269,23 @@ without modification.")
                    (delete-file-recursively (string-append out "/share"))
                    #t))))))))))
 
+(define-public bash-with-syslog
+  (package
+    (inherit bash)
+    (name "bash-with-syslog")
+    (arguments
+     (substitute-keyword-arguments (package-arguments bash)
+       ((#:phases phases '%standard-phases)
+        `(modify-phases ,phases
+           (add-after 'unpack 'enable-syslogging
+             (lambda _
+               (substitute* "config-top.h"
+                 (("/\\* #define SYSLOG_HISTORY \\*/")
+                  "#define SYSLOG_HISTORY"))))))))
+    (description
+     "Bash is the shell, or command-line interpreter, of the GNU system.  This
+variant logs the history to syslog.")))
+
 (define-public bash-completion
   (package
     (name "bash-completion")