summaryrefslogtreecommitdiff
path: root/gnu/installer/tests.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/installer/tests.scm')
-rw-r--r--gnu/installer/tests.scm22
1 files changed, 11 insertions, 11 deletions
diff --git a/gnu/installer/tests.scm b/gnu/installer/tests.scm
index a9a5d5d9880..b315176ff4c 100644
--- a/gnu/installer/tests.scm
+++ b/gnu/installer/tests.scm
@@ -18,6 +18,17 @@
18;;; You should have received a copy of the GNU General Public License 18;;; You should have received a copy of the GNU General Public License
19;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. 19;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
20 20
21;;; Commentary:
22;;;
23;;; This module provides tools to test the guided "graphical" installer in a
24;;; non-interactive fashion. The core of it is 'converse': it allows you to
25;;; state Expect-style dialogues, which happen over the Unix-domain socket the
26;;; installer listens to. Higher-level procedures such as
27;;; 'choose-locale+keyboard' are provided to perform specific parts of the
28;;; dialogue.
29;;;
30;;; Code:
31
21(define-module (gnu installer tests) 32(define-module (gnu installer tests)
22 #:use-module (srfi srfi-1) 33 #:use-module (srfi srfi-1)
23 #:use-module (srfi srfi-34) 34 #:use-module (srfi srfi-34)
@@ -44,17 +55,6 @@
44 55
45 edit-configuration-file)) 56 edit-configuration-file))
46 57
47;;; Commentary:
48;;;
49;;; This module provides tools to test the guided "graphical" installer in a
50;;; non-interactive fashion. The core of it is 'converse': it allows you to
51;;; state Expect-style dialogues, which happen over the Unix-domain socket the
52;;; installer listens to. Higher-level procedures such as
53;;; 'choose-locale+keyboard' are provided to perform specific parts of the
54;;; dialogue.
55;;;
56;;; Code:
57
58(define %installer-socket-file 58(define %installer-socket-file
59 ;; Socket the installer listens to. 59 ;; Socket the installer listens to.
60 "/var/guix/installer-socket") 60 "/var/guix/installer-socket")