[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[shepherd] 07/07: Rename 'dmd-output-port' to 'shepherd-output-port'.
From: |
Ludovic Courtès |
Subject: |
[shepherd] 07/07: Rename 'dmd-output-port' to 'shepherd-output-port'. |
Date: |
Fri, 22 Jan 2016 23:37:00 +0000 |
civodul pushed a commit to branch master
in repository shepherd.
commit 28ed7e14ef66a6b7d85b7ce72c83879330605979
Author: Alex Kost <address@hidden>
Date: Fri Jan 22 22:44:29 2016 +0300
Rename 'dmd-output-port' to 'shepherd-output-port'.
* modules/shepherd/comm.scm (make-dmd-output-port): Rename to...
(make-shepherd-output-port): ... this.
(dmd-output-port): Rename to...
(shepherd-output-port): ... this.
* modules/shepherd.scm (main): Adjust accordingly.
Signed-off-by: Ludovic Courtès <address@hidden>
---
modules/shepherd.scm | 2 +-
modules/shepherd/comm.scm | 8 ++++----
2 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/modules/shepherd.scm b/modules/shepherd.scm
index 6c0aade..9551267 100644
--- a/modules/shepherd.scm
+++ b/modules/shepherd.scm
@@ -138,7 +138,7 @@
(start-logging logfile)
;; Send output to log and clients.
- (set-current-output-port dmd-output-port)
+ (set-current-output-port shepherd-output-port)
;; Start the dmd service.
(start dmd-service)
diff --git a/modules/shepherd/comm.scm b/modules/shepherd/comm.scm
index 1c086fe..0dc7faa 100644
--- a/modules/shepherd/comm.scm
+++ b/modules/shepherd/comm.scm
@@ -51,7 +51,7 @@
start-logging
stop-logging
%current-client-socket
- dmd-output-port))
+ shepherd-output-port))
;; Command for dmd.
@@ -188,7 +188,7 @@ on service '~a':")
;; We provide our own output mechanism, because we have certain
;; special needs; most importantly, we want to send output to herd
;; sometimes.
-(define (make-dmd-output-port original-output-port)
+(define (make-shepherd-output-port original-output-port)
(make-soft-port
(vector
@@ -245,5 +245,5 @@ on service '~a':")
;; It's an output-only port.
"w"))
-(define dmd-output-port
- (make-dmd-output-port (current-output-port)))
+(define shepherd-output-port
+ (make-shepherd-output-port (current-output-port)))
- [shepherd] branch master updated (852341e -> 28ed7e1), Ludovic Courtès, 2016/01/22
- [shepherd] 01/07: herd: Report errors according to the GNU standards., Ludovic Courtès, 2016/01/22
- [shepherd] 03/07: support: Add 'display-line'., Ludovic Courtès, 2016/01/22
- [shepherd] 04/07: comm: Add 'report-command-error'., Ludovic Courtès, 2016/01/22
- [shepherd] 05/07: reboot, halt: Adjust to sexp replies., Ludovic Courtès, 2016/01/22
- [shepherd] 07/07: Rename 'dmd-output-port' to 'shepherd-output-port'.,
Ludovic Courtès <=
- [shepherd] 02/07: Move 'report-error' to (shepherd support)., Ludovic Courtès, 2016/01/22
- [shepherd] 06/07: shepherd: Ignore SIGPIPE., Ludovic Courtès, 2016/01/22