elisp/system-linux.el at master · mattkeller/elisp · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
;;;; system-gnu/linux.el -- linux-only config

;; w3m config ----------------------------------------------------------

(add-to-list 'load-path (concat dotfiles-dir "lib/emacs-w3m"))
(autoload 'w3m-browse-url "w3m" "Ask a WWW browser to show a URL." t)
(setq w3m-use-cookies t)

(defun mk-choose-browser (url &rest args)
  (interactive "sURL: ")
  (if (y-or-n-p "Use firefox? ")
      (browse-url-firefox url)
    (w3m-browse-url url)))

(setq browse-url-browser-function '(("hyperspec" . w3m-browse-url)
				    ("javase"    . w3m-browse-url)
				    ("."         . mk-choose-browser)))

;;; server -------------------------------------------------------------

(when (< emacs-major-version 23) ; Using emacs23 --daemon now
  (start-named-server "server")) ; default server-name