all messages for Guix-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* bug#28752: openvpn-client-service error
@ 2017-10-08 20:03 john herrlin
  2017-10-09 11:41 ` julien lepiller
  0 siblings, 1 reply; 5+ messages in thread
From: john herrlin @ 2017-10-08 20:03 UTC (permalink / raw)
  To: 28752; +Cc: julien


[-- Attachment #1.1: Type: text/plain, Size: 1810 bytes --]

Hey,

I am facing a problem with (openvpn-client-service) when trying to
reconfigure the system.
Its GuixSD on a x86-64, the system config is attached.

Backtrace:
In srfi/srfi-1.scm:
   592:29 19 (map1 (#<<service> type: #<service-type nscd 22f74b0…> …))
   592:29 18 (map1 (#<<service> type: #<service-type guix 22f73c0…> …))
   592:29 17 (map1 (#<<service> type: #<service-type urandom-seed…> …))
   592:29 16 (map1 (#<<service> type: #<service-type syslog 22f74…> …))
   592:29 15 (map1 (#<<service> type: #<service-type static-netwo…> …))
   592:29 14 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29 13 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29 12 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29 11 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29 10 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29  9 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29  8 (map1 (#<<service> type: #<service-type console-font…> …))
   592:17  7 (map1 (#<<service> type: #<service-type openvpn-clie…> …))
In gnu/services/vpn.scm:
   409:24  6 (_ #<<openvpn-client-configuration> openvpn: #<package …>)
    379:9  5 (openvpn-config-file client #<<openvpn-client-configura…>)
In ice-9/ports.scm:
    549:4  4 (call-with-output-string _)
    473:4  3 (with-output-to-port _ _)
In ice-9/boot-9.scm:
   268:13  2 (for-each #<procedure 2636d40 at gnu/services/configur…> …)
In gnu/services/vpn.scm:
   112:19  1 (serialize-tls-auth client #f)
In unknown file:
           0 (string-append #f " " "1")

ERROR: In procedure string-append:
ERROR: In procedure string-append: Wrong type (expecting string): #f

[-- Attachment #1.2: Type: text/html, Size: 2256 bytes --]

[-- Attachment #2: .system.scm --]
[-- Type: text/x-scheme, Size: 4057 bytes --]

(use-modules
 (srfi srfi-1)
 (srfi srfi-9)
 (ice-9 rdelim)
 (guix)
 (gnu)
 (gnu system nss)
 (gnu system locale)
 (gnu packages linux)
 (gnu packages gnome)
 (gnu packages gnuzilla)
 (gnu packages suckless)
 (gnu packages vpn)
 (gnu packages ssh)
 (gnu packages scheme)
 (gnu packages admin)
 (gnu packages fonts)
 (gnu packages xorg)
 (gnu packages emacs)
 (gnu packages vpn)
 (gnu packages mail)
 (gnu packages dunst)
 (gnu packages xdisorg)
 (gnu packages guile)
 (gnu packages image-viewers)
 (gnu packages pulseaudio)
 (gnu packages display-managers)
 (gnu packages video)
 (gnu packages networking)
 (gnu packages version-control)
 (gnu packages ntp)
 (gnu packages libusb)
 (gnu services)
 (gnu services dbus)
 (gnu services networking)
 (gnu services admin)
 (gnu services vpn)
 (gnu services xorg)
 (gnu services web)
 (gnu services desktop))


(use-service-modules xorg dbus networking desktop admin mcron)
(use-package-modules xorg bootloaders wm certs suckless emacs base idutils)

(define libinput.conf "
# Use the libinput driver for all event devices
Section \"InputClass\"
	Identifier \"libinput keyboard catchall\"
	MatchIsKeyboard \"on\"
	MatchDevicePath \"/dev/input/event*\"
	Driver \"libinput\"
	Option \"XkbLayout\" \"us,se\"
	Option \"XkbOptions\" \"grp:win_space_toggle,caps:ctrl_modifier\"
EndSection
")

(define %user-name "nils")
(define %host-name "gnu")

(operating-system
  (host-name %host-name)
  (timezone "Europe/Paris")
  (locale "en_US.utf8")
  (locale-definitions
   (list
    (locale-definition (name "en_US.utf8") (source "en_US") (charset "UTF-8"))
    (locale-definition (name "sv_SE.utf8") (source "sv_SE") (charset "UTF-8"))))

  (bootloader (bootloader-configuration
	       (bootloader grub-efi-bootloader)
	       (target "/boot")))

  (file-systems (cons* (file-system
			 (device "guixsd-root")
			 (title 'label)
			 (mount-point "/")
			 (type "ext4"))
		       (file-system
			 (device "/dev/sda1")
			 (mount-point "/boot")
			 (needed-for-boot? #t)
			 (type "vfat"))
		       %base-file-systems))

  (kernel-arguments '("modprobe.blacklist=pcspkr,snd_pcsp"))

  (users (cons (user-account
		(name %user-name)
		(comment %user-name)
		(group "users")
		(supplementary-groups
                 '("wheel" "netdev" "audio" "video"))
		(home-directory (string-append "/home/" %user-name)))
	       %base-user-accounts))

  (packages (cons* i3-wm
                   i3status
                   dmenu
                   dunst
		   nss-certs
                   font-inconsolata
		   font-dejavu
		   font-hack
		   font-liberation
		   font-terminus
		   font-ubuntu
                   pulseaudio
                   alsa-utils
                   openssh
		   emacs
                   emacs-use-package
                   offlineimap
                   mu
                   openvpn
                   network-manager-openvpn
                   sicp
		   icecat
		   htop
                   feh                   ;; set background image in i3
                   xbacklight
		   xf86-input-evdev
		   xf86-video-fbdev
		   xorg-server
		   rxvt-unicode
		   git
		   %base-packages))

  (services
   (cons*
    (service mcron-service-type)
    (service rottlog-service-type)

    (slim-service
     #:allow-empty-passwords? #f #:auto-login? #f
     #:startx (xorg-start-command
               #:configuration-file
               (xorg-configuration-file
                #:extra-config (list libinput.conf))))

    (simple-service 'mtp udev-service-type (list libmtp))

    ;; The D-Bus clique.
    (udisks-service)
    (upower-service)
    (accountsservice-service)
    (colord-service)
    (geoclue-service)
    (polkit-service)
    (elogind-service)
    (dbus-service)

    (service wpa-supplicant-service-type wpa-supplicant)
    (service network-manager-service-type
	     (network-manager-configuration))

    (ntp-service #:allow-large-adjustment? #t)

    (openvpn-client-service)

    %base-services))

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

^ permalink raw reply	[flat|nested] 5+ messages in thread
end of thread, other threads:[~2017-10-11 13:30 UTC | newest]

Thread overview: 5+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2017-10-08 20:03 bug#28752: openvpn-client-service error john herrlin
2017-10-09 11:41 ` julien lepiller
2017-10-09 16:22   ` john herrlin
2017-10-10 12:06     ` julien lepiller
2017-10-11 13:29   ` Ludovic Courtès

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/guix.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.