URL Browsing Behaviour with find-file-at-point()

URL Browsing Behaviour with find-file-at-point()

[Nordlöw]

Hello again, Hackers

Browsing an URL such as http://www.xsteve.at/prg/emacs/psvn.el
with the command find-file-at-point() opens the file in my web
browser.
It would like this command to open all URLs matching auto-mode-alist
directly in an Emacs instead. How can I achieve this?

Thanks in advance,

/Nordlöw

Re: URL Browsing Behaviour with find-file-at-point()

[Peter Dyballa]

Am 09.07.2007 um 23:27 schrieb Nordlöw:

> It would like this command to open all URLs matching auto-mode-alist
> directly in an Emacs instead. How can I achieve this?

The variable browse-url-browser-function should give some clues.

--
Greetings

   Pete

   Basic, n.:
A programming language.  Related to certain social diseases in
that those who have it will not admit it in polite company.

Re: URL Browsing Behaviour with find-file-at-point()

[Stefan Reichör]

Nordlöw <per.nordlow@gmail.com> writes:

> Hello again, Hackers
>
> Browsing an URL such as http://www.xsteve.at/prg/emacs/psvn.el
> with the command find-file-at-point() opens the file in my web
> browser.
> It would like this command to open all URLs matching auto-mode-alist
> directly in an Emacs instead. How can I achieve this?

Hm. Since you did some advertisement for my homepage, I will try to help you ;-)

You could use the emacs-wget interface:
http://pop-club.hp.infoseek.co.jp/emacs/emacs-wget/
http://pop-club.hp.infoseek.co.jp/emacs/emacs-wget/USAGE

The just type M-x wget RET

The file is downloaded to the folder ~/download

I have added the the following customization to open the downloaded file:

(defun wget-open-downloaded-file ()
  (let* ((dir  (cdr (assoc proc wget-process-dir-alist)))
         (file (or (cdr (assoc proc wget-process-saved-alist))
                   (wget-process-file-name proc)))
         (full-file-name (expand-file-name file dir)))
    (message "downloaded %s" full-file-name)
    (find-file full-file-name)))
       
(add-hook 'wget-after-hook 'wget-open-downloaded-file)


Stefan.