* modules/shepherd/support.scm (make-dmd-user-module): Rename to...
(make-user-module): ... this.
(load-in-user-module): Adjust accordingly.
---
modules/shepherd/support.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/modules/shepherd/support.scm b/modules/shepherd/support.scm
index 9bfb050..562a87b 100644
--- a/modules/shepherd/support.scm
+++ b/modules/shepherd/support.scm
@@ -303,7 +303,7 @@ create a template configuration file if non exists."
(define persistency #f)
(define persistency-state-file default-persistency-state-file)
-(define (make-dmd-user-module)
+(define (make-user-module)
"Return a new module, for use when evaluating the user's configuration,
which has essential bindings pulled in."
(let ((m (make-fresh-user-module)))
@@ -315,7 +315,7 @@ which has essential bindings pulled in."
(define (load-in-user-module file)
"Load FILE in a fresh user module that has essential bindings pulled in."
- (let ((user-module (make-dmd-user-module)))
+ (let ((user-module (make-user-module)))
(save-module-excursion
(lambda ()
(set-current-module user-module)
--
2.6.3
