* 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


Reply via email to