These are hardly ever interesting, and eat half of the initial frame.
(progn (setq server-temp-file-regexp (concat "^" tmpdir "\\|/draft$")
edit-server-new-frame nil
gnuserv-frame t)
(progn (setq server-temp-file-regexp (concat "^" tmpdir "\\|/draft$")
edit-server-new-frame nil
gnuserv-frame t)
+ (trap (let ((warning-suppress-types
+ (cons '(server) warning-suppress-types)))
+ (server-start)))
(trap (progn
(require 'edit-server)
(edit-server-start)
(trap (progn
(require 'edit-server)
(edit-server-start)