jmd pushed a commit to branch wip-installer
in repository guix.

commit 3f103a4b0515342ae867aa5f9cbe42806739b5af
Author: John Darrington <[email protected]>
Date:   Fri Dec 16 11:51:50 2016 +0100

    installer: Remove obsolete procedures/variables
    
    * gnu/system/installer/utils.scm (debug-port, debug): Remove.
---
 gnu/system/installer/utils.scm |    8 --------
 1 file changed, 8 deletions(-)

diff --git a/gnu/system/installer/utils.scm b/gnu/system/installer/utils.scm
index 6df2535..bcecb07 100644
--- a/gnu/system/installer/utils.scm
+++ b/gnu/system/installer/utils.scm
@@ -23,8 +23,6 @@
            slurp
            quit-key?
 
-           debug
-           
            push-cursor
            pop-cursor
 
@@ -53,12 +51,6 @@
 
 (define (N_ str) str)
 
-(define debug-port (open "/tmp/xx" (logior O_APPEND O_CREAT O_WRONLY)))
-                   
-(define (debug str)
-  (display str debug-port)
-  (force-output debug-port))
-
 
 (define (make-window-port win)
   "Return a port which writes to the curses window WIN"

Reply via email to