(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)))))
;; Control backup behaviour.
(setq w3m-default-display-inline-images t)
+(eval-after-load "w3m"
+ '(let ((entries '(("application/pdf" "\\.pdf\\'" ("evince" file) nil)
+ ("application/x-pdf" "\\.pdf\\'" ("evince" file) nil))))
+ (dolist (e entries)
+ (setq w3m-content-type-alist
+ (cons e (remove* (car e) w3m-content-type-alist
+ :key #'car :test #'string=))))))
+
(setq w3-do-incremental-display t
w3-use-menus '(file edit view go bookmark options
buffers style search emacs nil help)