Replace deprecated hosts-file

Julien LepillerTue Jun 20 19:08:26+0200 2023

7f78560

Replace deprecated hosts-file

modules/config/os.scm

117117 
      (cons (locale-definition
118118 
              (name "eo.utf8") (source "eo"))
119119 
            %default-locale-definitions))
120-
    (hosts-file
121-
      (plain-file "hosts"
122-
        (string-append "127.0.0.1 lepiller.eu localhost " host-name "\n"
123-
                       "::1       lepiller.eu localhost " host-name "\n"
124-
                       %facebook-host-aliases)))
125120 
    (packages (cons* openssh tmux neovim nss-certs %base-packages))
126-
    (services %base-services)))
121+
    (services (cons* (service block-facebook-hosts-service-type)
122+
		     %base-services))))
127123 
128124 
(define (tyreunom-desktop-os host-name)
129125 
  (let ((system (tyreunom-os host-name)))
…
138134 
                   user))
139135 
             (operating-system-users system)))
140136 
      (groups %base-groups)
141-
      (hosts-file
142-
        (plain-file "hosts"
143-
          (string-append "127.0.0.1 " host-name ".lepiller.eu localhost " host-name "\n"
144-
                         "::1       " host-name ".lepiller.eu localhost " host-name "\n"
145-
                         %facebook-host-aliases)))
146137 
      (packages (cons* ibus ibus-anthy
147138 
                       swaylock wpa-supplicant gvfs openbox xfce4-terminal
148139 
                       (operating-system-packages system))))))