; browse-url.el が load されている必要があります。 (setq browse-url-browser-function 'browse-url-lynx) (setq browse-url-lynx-arguments '("-cfg" "~/.lynx/lynx.cfg" "-color")) (setq browse-url-lynx-kterm-arguments '("-T" "Lynx@gnus" "-n" "Lynx" "-geometry" "80x40")) (defun browse-url-lynx (url) (interactive (browse-url-interactive-arg "sLynx URL: ")) (apply 'start-process "kterm" nil "kterm" (append (append browse-url-lynx-kterm-arguments '("-e" "lynx")) (append browse-url-lynx-arguments (list url)))))