bug#23001: emacs in X has icons missing and throws warnings in tty

[myglc2 <myglc2@gmail.com>]

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

Updating this for what I see in guix (GNU Guix) 0.13.0.4589-74bea6

On 03/12/2016 at 19:43 myglc2 writes:

> When running GuixSD on a headless server  ...
>
> ssh
> emacs
>
> ... produces emacs running in X but ...
>
> - all of the menu icons are missing except one ('file drawers')

Icons are all OK now. Yeah!

> - lots of messages are shooting in the tty session (sample below).
[...]

Now only two messages are being generated ...

vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
g1@g1 ~$ emacs
process 27189: D-Bus library appears to be incorrectly
set up; failed to read machine uuid: Failed to open "/etc/machine-id":
No such file or directory See the manual page for dbus-uuidgen to
correct this issue.

** (emacs-25-3:27189): WARNING **: Error retrieving accessibility bus
address: org.freedesktop.DBus.Error.ServiceUnknown: The name
org.a11y.Bus was not provided by any .service files
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

Attempting to follow the instructions in the first message, I installed
dbus, but I don't see any dbus-uuidgen man page, or any other dbus man
pages.

The second message is referenced in bug#28088 ...

Subject: bug#28088: "The name org.a11y.Bus was not provided by any
.service files" with multiple applications

The messages seem harmless. Perhaps the bug should be downgraded?

Current config:


[-- Attachment #2: sys.scm --]
[-- Type: application/octet-stream, Size: 2053 bytes --]

;;; GuixSD headless server
(use-modules (gnu))
(use-service-modules networking ssh)
(use-package-modules
 admin
 base
 certs
 cups
 disk
 emacs
 freeipmi
 linux
 virtualization
 rsync
 screen
 ssh
 version-control
 wget
 xorg 
 )
(operating-system
  (host-name "g1")
  (timezone "America/New_York")
  (locale "en_US.utf8")
  (kernel-arguments '("console=ttyS1,115200"))
  ;; RAID1 root using 1 NVMe SSD + 2 HDs
  (bootloader (grub-configuration (target "/dev/nvme0n1")
				  (terminal-outputs '(console))
				  (terminal-inputs '(serial console))
				  (serial-speed 115200)				  
				  ))
  (initrd (lambda (file-systems . rest) (apply base-initrd file-systems
					       #:extra-modules '("raid1")
					       rest)))
  (mapped-devices (list (mapped-device
			 (source '("/dev/nvme0n1p1" "/dev/sda1" "/dev/sdb1"))
			 (target "/dev/md3")
			 (type raid-device-mapping))))
  (file-systems (cons (file-system
			(title 'device)
			(device "/dev/md3")
			(mount-point "/")
			(type "ext4")
			(dependencies mapped-devices))
		      %base-file-systems))
  (swap-devices '("/dev/nvme0n1p2" ))
  (users (cons* (user-account (name "g1")
			      (group "users")
			      (supplementary-groups '("wheel" "kvm"))
			      (home-directory (string-append "/home/" name)))
		(user-account (name "admin")
			      (group "users")
			      (supplementary-groups '("wheel" "kvm"))
			      (home-directory (string-append "/home/" name)))
		%base-user-accounts))
  (packages (cons*
	     cups
	     emacs-no-x-toolkit
	     emacs-guix
	     emacs-zenburn-theme
	     freeipmi
	     git
	     glibc-utf8-locales
	     gnu-make
	     mdadm
	     magit
	     nss-certs
	     openssh
	     parted
	     qemu
	     rsync
	     screen
	     smartmontools
	     tree
	     wget
	     xauth
	     %base-packages))
  (services (cons* (dhcp-client-service)
		   (ntp-service)
		   (service openssh-service-type (openssh-configuration
						  (x11-forwarding? #t)))
		   (agetty-service (agetty-configuration (tty "ttyS1")
							 (baud-rate "115200")))
		   %base-services)))

[-- Attachment #3: g1-emacs-dbus.scm --]
[-- Type: application/octet-stream, Size: 769 bytes --]

;; Guix user config
(use-modules (gnu packages))
(specifications->manifest
      '("aspell"
	"aspell-dict-en"
	"borg"
	"emacs-ag"
	"emacs-bui"            ;; to build emacs-guix from git checkout
	"emacs"
	"dbus"
	"emacs-debbugs"
	"emacs-paredit"        ;; AKA paredit
	"emacs-pdf-tools"
	"emacs-simple-httpd"
	"emacs-web-mode"
	"emacs-with-editor"
	"emacs-zenburn-theme"
	"emacs-flycheck"
	"font-dejavu"
	"font-gnu-freefont-ttf"
	"geiser"
	"ghostscript"
	"git"
	"git-modes"
	"guile@2.2"
	"make"                 ;; AKA gnu-make
	"graphviz"
	"gs-fonts"
	"guile-charting"
	"gv"
	"icecat"
	"isync"
	"magit"
	"mosh"
	"mu"
	"mupdf"
	"notmuch"
	"screen"
	"sicp"
	"the-silver-searcher"
	"time"
	"tree"
	;; R related
	"r" "emacs-ess"
	;; git info related
	"asciidoc"
	)
      )