From 6860c0f312be8c14b8b58608a21ffa8385ef7254 Mon Sep 17 00:00:00 2001
From: Noah Metz <noah@metznet.ca>
Date: Mon, 4 Dec 2023 15:12:56 -0700
Subject: [PATCH] Moved debug level for slapd to configuration value(default 1)

---
 gnu/services/slapd.scm | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

diff --git a/gnu/services/slapd.scm b/gnu/services/slapd.scm
index 2e9df46..c4f639b 100644
--- a/gnu/services/slapd.scm
+++ b/gnu/services/slapd.scm
@@ -23,7 +23,8 @@
                                        (backup-date (date (current-date))
                                         "date that backup(seed) is from, to not use the same/older seed")
                                        (uris (string "ldap:// ldapi://")
-                                        "slapd uris to accept connections to"))
+                                        "slapd uris to accept connections to")
+                                       (log-level (integer 1) "log level to start slapd with"))
 
 (define (slapd-accounts config)
   (list (user-group
@@ -128,20 +129,18 @@
                                                                      (slapd-configuration-openldap
                                                                       config)
                                                                      "/libexec/slapd")
+                                                               "-d" ;To run in foreground
+                                                               #$(number->string (slapd-configuration-log-level
+                                                                   config))
                                                                "-F"
                                                                "/var/lib/slapd/slapd.d"
                                                                "-h"
-                                                               #$(slapd-configuration-uris config)
+                                                               #$(slapd-configuration-uris
+                                                                  config)
                                                                "-u"
                                                                "slapd"
                                                                "-g"
                                                                "slapd")
-                                                              #:environment-variables
-                                                              (list (string-append
-                                                                     "LD_LIBRARY_PATH=${LD_LIBRARY_PATH}:"
-                                                                     #$(slapd-configuration-home
-                                                                        config)
-                                                                     "/modules"))
                                                               #:user "root"
                                                               #:group "root"))
                           (stop #~(make-kill-destructor)))))