browse-url seems not to work in 21.5.29

[Uwe Brauer]

Hello

I am using the same browse-url.el in both xemacsen
and have the following hack.



(defun my-goto-address-at-point ()
  "Send to the e-mail address or load the URL at point.
Send mail to address at point.  See documentation for
`goto-address-find-address-at-point'.  If no address is found
there, then load the URL at or before point."
  (interactive)
  (save-excursion
    (let ((address (save-excursion (goto-address-find-address-at-point))))
      (if address
      (gnus-msg-mail address)
	(let ((url (browse-url-url-at-point)))
	  (if url
	      (browse-url url)
	    (error "No e-mail address or URL found")))))))

Now that works without problems in 21.4.22 (using seamonkey)
but in 21.5.29 seamonkey is used but the address is not
passed resulting in a empty seamonkey window.

I tried to debug browse-url but then I have to debug another
function etc. Etc.

Anybody has the same experience?

Uwe Brauer