me/guix
Archived
1
0
Fork 0
Code Activity

services: base: Deprecate 'mingetty-service' procedure.

Browse source 
* doc/guix.texi (Base Services): Replace mingetty-service with
mingetty-service-type.
* gnu/services/base.scm (mingetty-service): Deprecate procedure.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Bruno Victal 2023-02-25 18:57:49 +00:00 • committed by Ludovic Courtès
parent 6dd635b4cf
commit ad665a38fc
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
3 changed files with 14 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
doc/guix.texi
View file

@ -18123,18 +18123,17 @@ the 'root' account has just been created.
@end table
@end deftp
@deffn {Scheme Procedure} mingetty-service @var{config}
Return a service to run mingetty according to @var{config}, a
@code{<mingetty-configuration>} object, which specifies the tty to run, among
other things.
@end deffn
@defvar mingetty-service-type
Type of the service that runs Mingetty, an implementation of the
virtual console log-in. The value for this service is a
@code{<mingetty-configuration>} object.
@end defvar
@deftp {Data Type} mingetty-configuration
This is the data type representing the configuration of Mingetty, which
provides the default implementation of virtual console log-in.
Data type representing the configuration of Mingetty, which specifies
the tty to run, among other things.
@table @asis
@item @code{tty}
The name of the console this Mingetty runs on---e.g., @code{"tty1"}.

5
gnu/services/base.scm
View file

@ -173,7 +173,7 @@
mingetty-configuration-clear-on-logout?
mingetty-configuration-mingetty
mingetty-configuration?
mingetty-service
mingetty-service ; deprecated
mingetty-service-type
%nscd-default-caches
@ -1275,7 +1275,8 @@ the tty to run, among other things."
"Provide console login using the @command{mingetty}
program.")))
(define* (mingetty-service config)
(define-deprecated (mingetty-service config)
mingetty-service-type
"Return a service to run mingetty according to @var{config}, which specifies
the tty to run, among other things."
(service mingetty-service-type config))

7
gnu/system/install.scm
View file

@ -331,9 +331,10 @@ Using this shell, you can carry out the installation process \"manually.\"
Access documentation at any time by pressing Alt-F2.\x1b[0m
")))
(define (normal-tty tty)
(mingetty-service (mingetty-configuration (tty tty)
(auto-login "root")
(login-pause? #t))))
(service mingetty-service-type
(mingetty-configuration (tty tty)
(auto-login "root")
(login-pause? #t))))
(define bare-bones-os
(load "examples/bare-bones.tmpl"))