2018-01-03 2:03 GMT+01:00 Danny Milosavljevic <dan...@scratchpost.org>:
> $ cat vm-config-desktop.scm
>
> (operating-system
> (host-name "antelope")
> (timezone "Europe/Paris")
> (locale "it_IT.utf8")
> (kernel-arguments `("console=ttyS0"))
>
> ;; Assuming /dev/sdX is the target hard disk, and "my-root"
> ;; is the label of the target root file system.
> (bootloader (grub-configuration (device "/dev/sda")))
>
> (file-systems (cons (file-system
> (device "my-root")
> (title 'label)
> (mount-point "/")
> (type "ext4")
>
> )
> %base-file-systems))
>
> (users (cons (user-account
> (name "catonano")
> (comment "Alice's brother")
> (group "users")
> (supplementary-groups '("wheel" "netdev"
> "audio" "video"))
> (home-directory "/home/catonano"))
> %base-user-accounts))
>
> ;; This is where we specify system-wide packages.
> (packages (cons* nss-certs ;for HTTPS access
> gvfs ;for user mounts
> %base-packages))
>
> ;; Add GNOME and/or Xfce---we can choose at the log-in
> ;; screen with F1. Use the "desktop" services, which
> ;; include the X11 log-in service, networking with Wicd,
> ;; and more.
> (services (cons* (postgresql-service #:locale "it_IT.UTF-8")
> ;(service trytond-service-type)
> (service agetty-service-type (agetty-configuration (tty
> "ttyS0")))
> (gnome-desktop-service)
> (xfce-desktop-service)
> %desktop-services))
>
> ;; Allow resolution of '.local' host names with mDNS.
> (name-service-switch %mdns-host-lookup-nss))
>
>
> And then
>
> $ `guix system vm ~/vm-config-desktop.scm --image-size=10GB
> --share=$HOME/tmp=/exchange` -serial stdio
> ...
> This is the GNU system. Welcome.
> antelope login:
>
Ok, now I can login into the guest from the host terminal
This will be uuseful !
Thanks
