(trap (server-start))
(trap (progn
(require 'edit-server)
- (edit-server-start)))))
+ (edit-server-start)
+ (let ((edit (get-process "edit-server")))
+ (and edit
+ (set-process-query-on-exit-flag edit nil)))))))
;; Control backup behaviour.
(setq password-cache-expiry nil)
(setq-default proced-filter 'all
proced-sort 'user)
-(setq ispell-program-name "aspell"
+(setq ispell-program-name "aspell-hack"
ispell-local-dictionary "en_GB-ize-w_accents"
flyspell-default-dictionary "en_GB-ize-w_accents"
ispell-silently-savep t)
(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)