bug#22626: Postgres service fails on adding user

[Christopher Allan Webber <cwebber@dustycloud.org>]

[-- Attachment #1: Type: text/plain, Size: 1786 bytes --]

Heya all... guix system config attached.  I tried doing a guix system
reconfigure and it failboat'ed.  Here's what happened:

  adding user 'postgres'...
  useradd: group 'postgres' does not exist
  Backtrace:
  In ice-9/boot-9.scm:
    63: 19 [call-with-prompt prompt0 ...]
  In ice-9/eval.scm:
   432: 18 [eval # #]
  In ice-9/boot-9.scm:
  2401: 17 [save-module-excursion #<procedure 28dc940 at ice-9/boot-9.scm:4045:3 ()>]
  4050: 16 [#<procedure 28dc940 at ice-9/boot-9.scm:4045:3 ()>]
  1724: 15 [%start-stack load-stack ...]
  1729: 14 [#<procedure 28f3ea0 ()>]
  In unknown file:
     ?: 13 [primitive-load "/gnu/store/24mbii9wjlyzfzsqwfmcvz6vz2fv5n6g-guix-0.9.0.c3f29bc/bin/.guix-real"]
  In guix/ui.scm:
  1177: 12 [run-guix-command system "reconfigure" "guix-config.scm"]
  In ice-9/boot-9.scm:
   157: 11 [catch srfi-34 #<procedure 4fb2020 at guix/ui.scm:413:2 ()> ...]
   157: 10 [catch system-error ...]
  In guix/scripts/system.scm:
   701: 9 [process-action reconfigure ("guix-config.scm") ...]
  In guix/store.scm:
  1061: 8 [run-with-store # ...]
  In guix/scripts/system.scm:
   520: 7 [#<procedure 91f6f80 at guix/scripts/system.scm:520:13 (state)> #]
   302: 6 [#<procedure 9661740 at guix/scripts/system.scm:286:2 (state)> #]
  In unknown file:
     ?: 5 [primitive-load "/gnu/store/fnanaa7xalxa9h3yh1hpj3m5zgm9wasp-activate"]
  In ice-9/eval.scm:
   432: 4 [eval # ()]
  In ice-9/boot-9.scm:
   768: 3 [for-each #<procedure primitive-load (_)> #]
  In unknown file:
     ?: 2 [primitive-load "/gnu/store/hz2hnin6c12afvsyqxv0vs2rndxl9vpg-activate-servic
  e"]
  In ice-9/eval.scm:
   411: 1 [eval # ()]
  In unknown file:
     ?: 0 [getpw "postgres"]
  
  ERROR: In procedure getpw:
  ERROR: In procedure getpw: entry not found

Config attached.  Thanx!
 - cwebb


[-- Attachment #2: guix-config.scm --]
[-- Type: application/octet-stream, Size: 2656 bytes --]

;; This is an operating system configuration template
;; for a "desktop" setup with X11.

(use-modules (gnu) (gnu system nss)
             (gnu packages linux))
(use-service-modules desktop databases)
(use-package-modules xfce certs pulseaudio)

(operating-system
  (host-name "oolong")
  (timezone "America/Los_Angeles")
  (locale "en_US.UTF-8")

  (kernel linux-libre-4.1)

  ;; Assuming /dev/sdX is the target hard disk, and "root" is
  ;; the label of the target root file system.
  (bootloader (grub-configuration
	       (device "/dev/sda")))
  (mapped-devices (list (mapped-device
			 (source "/dev/sda8")
			 (target "home-luks")
			 (type luks-device-mapping))))
  (file-systems `(,(file-system
                        (device "guix")
                        (title 'label)
                        (mount-point "/")
                        (type "ext4"))
                  ,(file-system
                     (device "/dev/mapper/home-luks")
                     (mount-point "/home")
                     (type "ext4"))
                  ,(file-system
                     (device "debian")
                     (title 'label)
                     (mount-point "/mnt/debian")
                     (type "ext4"))
                  ;;; Not quite the right way to mount this...
                  ;; ,(file-system
                  ;;    (device "/dev/disk/by-uuid/e9b11604-c044-400b-9dd5-97b40158a928")
                  ;;    (title 'label)
                  ;;    (mount-point "/mnt/backup")
                  ;;    (type "ext4")
                  ;;    (mount? #f))
                  ,@%base-file-systems))

  (users (cons (user-account
                (name "cwebber")
		(uid 1000)
                (comment "Christopher Allan Webber")
                (group "cwebber")
                (supplementary-groups '("users"
					"wheel" "netdev"
                                        "audio" "video"))
                (home-directory "/home/cwebber"))
               %base-user-accounts))

  (groups (cons (user-group
		 (name "cwebber")
		 (id 1000))
		%base-groups))

  ;; Add Xfce and Ratpoison; that allows us to choose
  ;; sessions using either of these at the log-in screen.
  (packages (cons* xfce    ;desktop environments
                   nss-certs         ;for HTTPS access
                   pulseaudio
                   %base-packages))

  ;; Use the "desktop" services, which include the X11
  ;; log-in service, networking with Wicd, and more.
  (services (cons*
             (postgresql-service)
             %desktop-services))

  ;; Allow resolution of '.local' host names with mDNS.
  (name-service-switch %mdns-host-lookup-nss))