~ruther/guix-local

f79551d07565d274e41622a0cee54fce22919e77 — Bruno Victal 3 years ago 64860ed
services: base: Remove 'console-font-service' procedure.

* gnu/services/base.scm (console-font-service): Remove procedure.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
1 files changed, 0 insertions(+), 8 deletions(-)

M gnu/services/base.scm
M gnu/services/base.scm => gnu/services/base.scm +0 -8
@@ 886,14 886,6 @@ package or any valid argument to @command{setfont}, as in this example:
                 \"/share/consolefonts/ter-132n\"))) ; for HDPI
@end example\n")))

(define* (console-font-service tty #:optional (font "LatGrkCyr-8x16"))
  "This procedure is deprecated in favor of @code{console-font-service-type}.

Return a service that sets up Unicode support in @var{tty} and loads
@var{font} for that tty (fonts are per virtual console in Linux.)"
  (simple-service (symbol-append 'console-font- (string->symbol tty))
                  console-font-service-type `((,tty . ,font))))

(define %default-motd
  (plain-file "motd" "This is the GNU operating system, welcome!\n\n"))