dot/emacs: Hide warnings about the server when starting up.

These are hardly ever interesting, and eat half of the initial frame.

diff --git a/dot/emacs b/dot/emacs
index c339a17..051c6d2 100644 (file)
--- a/dot/emacs
+++ b/dot/emacs
@@ -133,7 +133,9 @@
      (progn (setq server-temp-file-regexp (concat "^" tmpdir "\\|/draft$")
                  edit-server-new-frame nil
                  gnuserv-frame t)
-           (trap (server-start))
+           (trap (let ((warning-suppress-types
+                        (cons '(server) warning-suppress-types)))
+                   (server-start)))
            (trap (progn
                    (require 'edit-server)
                    (edit-server-start)