Re: probs with firefox and gnus

[Xning Lee]

rdc1x@comcast.net (Robert D. Crawford) writes:

> I am new to the world of gnus (about 1.5 weeks) and I am having a bit of
> a problem getting gnus and firefox to work well together.  I found code
> on the emacs wiki to open an url in a new tab, but it opens in a new
> window instead.  Here is the pertinent info:
>
> Debian sid
> Emacs 21.3
> Firefox 0.9.1
>
> The function code looks like this on the site:
>
> ;; I have added line numbers for reference in this post only
> ;; I also changed formatting to keep the lines under 
> ;; 72 characters
>
> 1. (defun browse-url-firefox-new-tab (url &optional new-window)
> 2.  "Open URL in a new tab in Firefox."
> 3.   (interactive (browse-url-interactive-arg "URL: "))
> 4.   (let ((cmd (shell-command-to-string
> 5.    (concat "~/src/firefox/mozilla-xremote-client -a any 'openURL("
> 6.      url ",new-tab)'"))))
> 7.    (unless (string= "" cmd)
> 8.     (message "Starting Firefox...")
> 9.     (start-process (concat "firefox " url) 
>         nil "~/src/firefox/firefox" url)
> 10.    (message "Starting Firefox...done"))))
>
> I changed line 5 to read:
>
> 5.  (concat "/usr/lib/mozilla/mozilla-xremote-client -a
>             any 'openURL("
>
> and
>
> 5.  (concat "/usr/lib/mozilla-firefox/mozilla-firefox-xremote-client
>             -a any 'openURL(" 
>
> and 
>
> 5.  (concat "/usr/bin/firefox -a firefox -remote
>             'openURL("
>
> but none of them seem to work.  I also changed line 9 to reflect the
> local path to firefox.  The line in my .emacs that pertains to this
> reads:
>
>  '(browse-url-browser-function (quote browse-url-firefox-new-tab))
>
> I have tried google, but I can't seem to find anything.  What am I
> missing here?
>
> Thanks,
>
> rdc
>

my code: ( update-alternatives --config mozilla ==> firefox )
==================================================================
(defun my-browser (url &optional new-window)
  "Open URL in a new tab in Mozilla."
  (interactive (browse-url-interactive-arg "URL: "))
  (when
      (string-match ".*No running window found\.$" 
                    (shell-command-to-string 
                     (concat "mozilla -remote 'openurl(" url ",new-tab)'")))
    (message "Starting Mozilla...")
    (start-process (concat "mozilla " url) nil
                   "/bin/sh" "-c" (concat "mozilla " url "|| true"))
    (message "Starting Mozilla...done")))