(and (or window-system (>= emacs-major-version 23))
(progn (setq server-temp-file-regexp (concat "^" tmpdir "\\|/draft$")
+ edit-server-new-frame nil
gnuserv-frame t)
- (trap (server-start))))
+ (trap (server-start))
+ (trap (progn
+ (require 'edit-server)
+ (edit-server-start)
+ (let ((edit (get-process "edit-server")))
+ (and edit
+ (set-process-query-on-exit-flag edit nil)))))))
;; Control backup behaviour.
(setq url-cookie-untrusted-urls '("."))
(setq browse-url-browser-function (mdw-good-url-browser)
+ browse-url-generic-program "mdw-chrome"
browse-url-mozilla-program "firefox")
(setq w3m-default-display-inline-images t)