http://blog.nozav.org/ fr Tue, 28 Oct 2008 22:42:16 +0100 Documents sous licence Creative commons http://blogs.law.harvard.edu/tech/rss Dotclear http://blog.nozav.org/post/2004/10/21/13-utiliser-mozilla-firefox-pour-ouvrir-les-liens-sous-emacsgnus urn:md5:5a0b9c0bcc71c39ab607e1d82d9752b0 Thu, 21 Oct 2004 10:59:02 +0000 Juba Emacs, Gnus emacsfirefoxgnus <p>La commande utilisée sous Emacs (et donc sous Gnus) pour ouvrir et afficher le contenu d'url contenues dans des documents ou des mails est à définir sous la forme d'une fonction à rattacher à la fonction browse-url-browser-function. Il existe un cetain nombre de fonctions par défaut, mais aucune pour Mozilla Firefox (en tous cas pour ma version d'Emacs, la 21.3.1). Grâce à <a href="http://www.emacswiki.org">EmacsWiki</a> et à <a href="http://groups.google.com">Google Groups</a>, j'ai pu bricoler une fonction qui permet d'ouvrir le lien dans un nouveau tab si une instance de Firefox tourne déjà, et de lancer le navigateur sinon.</p> <p>A priori ça fonctionne pour Firefox 0.9 et au-delà. Voici le code à rajouter dans votre .emacs&nbsp;:</p> <pre>(defun browse-url-firefox-new-tab (url &amp;optional new-window) "Open URL in a new tab in Firefox." (interactive (browse-url-interactive-arg "URL: ")) (let ((cmd (shell-command-to-string (concat "mozilla-firefox -a firefox -remote 'openURL(" url ",new-tab)' &gt; /dev/null")))) (unless (string= "" cmd) (message "Starting Firefox...") (start-process (concat "firefox " url) nil "/bin/sh" "-c" (concat "mozilla-firefox " url "|| true")) (message "Starting Firefox...done"))))</pre> <pre>(setq browse-url-browser-function 'browse-url-firefox-new-tab)</pre> http://blog.nozav.org/post/2004/10/21/13-utiliser-mozilla-firefox-pour-ouvrir-les-liens-sous-emacsgnus#comment-form http://blog.nozav.org/post/2004/10/21/13-utiliser-mozilla-firefox-pour-ouvrir-les-liens-sous-emacsgnus#comment-form http://blog.nozav.org/feed/atom/comments/11