Subject: Re: browse-url

From: "Kent E. Holsinger" <[email-masked]>
Date: Fri, 1 Nov 96 07:54:39 EST

>>>>> "George" == George D Hadden <[email-masked]> writes:

    George> oops, i should have added that if i setq
    George> browse-url-browser-function to browse-url-netscape
    George> (instead of shell-execute-url), it will load netscape, but
    George> it seems to immediately stop without loading any url's.
    George> THIS was when reg.ini was requested.

    George> thanks again,

The following works fine for me (or rather it did *after* I recompiled
shelex.exe from the sources).

-- Kent

;; browser configuration
(autoload 'browse-url-at-point "browse-url"
  "Ask a WWW browser to load the URL at or before point." t)
(autoload 'browse-url-at-mouse "browse-url"
  "Ask a WWW browser to load a URL clicked with the mouse." t)
(autoload 'browse-url-of-buffer "browse-url"
  "Ask a WWW browser to display BUFFER." t)
(autoload 'browse-url-of-file "browse-url"
  "Ask a WWW browser to display FILE." t)
(autoload 'browse-url-of-dired-file "browse-url"
  "In Dired, ask a WWW browser to display the file named on this line." t)
;; Bind the browse-url commands to keys with the `C-c C-z' prefix
;; (as used by html-helper-mode):
(global-set-key "\C-c\C-z." 'browse-url-at-point)
(global-set-key "\C-c\C-zb" 'browse-url-of-buffer)
(global-set-key "\C-c\C-zu" 'browse-url)
(global-set-key "\C-c\C-zv" 'browse-url-of-file)
(add-hook 'dired-mode-hook
	  (function (lambda ()
		      (local-set-key "\C-c\C-zf" 'browse-url-of-dired-file))))
; Hook it to Rmail
(add-hook 'rmail-mode-hook
    (function (lambda ()
       (define-key rmail-mode-map [mouse 2] 'browse-url-at-mouse)
       (define-key rmail-mode-map "\r" 'browse-url-at-point))))
; Hook it to Gnus
(add-hook 'gnus-article-mode-hook
    (function (lambda ()
       (define-key gnus-article-mode-map [mouse 2] 'browse-url-at-mouse)
       (define-key gnus-article-mode-map "\r" 'browse-url-at-point))))
(defvar shell-execute-helper "shelex.exe")
(defun shell-execute-url (url &optional new-window)
"Invoke the shell-execute-helper program to call ShellExecute and launch
or re-direct a web browser on the specified url."
       (interactive "sURL: ")
       (call-process shell-execute-helper nil nil nil url))

(setq browse-url-browser-function 'shell-execute-url)
(setq gnus-button-url 'shell-execute-url)               ; GNUS

---

From: [email-masked] (George D. Hadden)
Date: Fri, 1 Nov 96 14:03:00 CST

>>>>> "KEH" == Kent E Holsinger <[email-masked]> writes:

George> thanks again,

KEH> The following works fine for me (or rather it did *after* I recompiled
KEH> shelex.exe from the sources).

KEH> -- Kent

<stuff deleted>

recompiling for w95 did the trick.  it seems to work like a charm now.  

thanks,

-geo