guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[shepherd] 03/03: comm: Remove 'start-logging' and 'stop-logging'.


From: Ludovic Courtès
Subject: [shepherd] 03/03: comm: Remove 'start-logging' and 'stop-logging'.
Date: Mon, 13 Mar 2023 17:57:36 -0400 (EDT)

civodul pushed a commit to branch master
in repository shepherd.

commit 1213ebf2911815247651c6c685245ca3e1e7b4c7
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Mon Mar 13 22:46:49 2023 +0100

    comm: Remove 'start-logging' and 'stop-logging'.
    
    These were deprecated in
    f7925b2227debde91ece17cc91981e4491936b72 (March 2018).
    
    * modules/shepherd/comm.scm (start-logging, stop-logging): Remove.
---
 modules/shepherd/comm.scm | 11 -----------
 1 file changed, 11 deletions(-)

diff --git a/modules/shepherd/comm.scm b/modules/shepherd/comm.scm
index 2bd77e7..c2ddcc7 100644
--- a/modules/shepherd/comm.scm
+++ b/modules/shepherd/comm.scm
@@ -52,8 +52,6 @@
 
             log-output-port
             syslog-output-port
-            start-logging
-            stop-logging
             make-shepherd-output-port
 
             %current-client-socket
@@ -215,15 +213,6 @@ on service '~a':")
   ;; Port for logging.  This must always be a valid port, never `#f'.
   (make-parameter (%make-void-port "w")))
 
-(define (start-logging file)                      ;deprecated
-  (let ((directory (dirname file)))
-    (unless (file-exists? directory)
-      (mkdir directory)))
-  (log-output-port (open-file file "al")))
-(define (stop-logging)                            ;deprecated
-  (close-port (log-output-port))
-  (log-output-port (%make-void-port "w")))
-
 (define %current-client-socket
   ;; Socket of the client currently talking to the daemon.
   (make-parameter #f))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]