Mercurial > emacs
comparison lisp/url/url.el @ 67975:ea32c9f0c8e7
(url-retrieve, url-retrieve-synchronously): Autoload.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 02 Jan 2006 05:24:31 +0000 |
| parents | 5a29e54d6794 |
| children | ba5077259cc1 c69d44922688 |
comparison
equal
deleted
inserted
replaced
| 67974:c307ab54eb58 | 67975:ea32c9f0c8e7 |
|---|---|
| 1 ;;; url.el --- Uniform Resource Locator retrieval tool | 1 ;;; url.el --- Uniform Resource Locator retrieval tool |
| 2 | 2 |
| 3 ;; Copyright (C) 1996, 1997, 1998, 1999, 2001, 2004, | 3 ;; Copyright (C) 1996, 1997, 1998, 1999, 2001, 2004, |
| 4 ;; 2005 Free Software Foundation, Inc. | 4 ;; 2005, 2006 Free Software Foundation, Inc. |
| 5 | 5 |
| 6 ;; Author: Bill Perry <wmperry@gnu.org> | 6 ;; Author: Bill Perry <wmperry@gnu.org> |
| 7 ;; Keywords: comm, data, processes, hypermedia | 7 ;; Keywords: comm, data, processes, hypermedia |
| 8 | 8 |
| 9 ;; This file is part of GNU Emacs. | 9 ;; This file is part of GNU Emacs. |
| 112 (setq url-setup-done t))) | 112 (setq url-setup-done t))) |
| 113 | 113 |
| 114 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 114 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 115 ;;; Retrieval functions | 115 ;;; Retrieval functions |
| 116 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 116 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 117 ;;;###autoload | |
| 117 (defun url-retrieve (url callback &optional cbargs) | 118 (defun url-retrieve (url callback &optional cbargs) |
| 118 "Retrieve URL asynchronously and call CALLBACK with CBARGS when finished. | 119 "Retrieve URL asynchronously and call CALLBACK with CBARGS when finished. |
| 119 URL is either a string or a parsed URL. | 120 URL is either a string or a parsed URL. |
| 120 | 121 |
| 121 CALLBACK is called when the object has been completely retrieved, with | 122 CALLBACK is called when the object has been completely retrieved, with |
| 153 (apply callback cbargs)))) | 154 (apply callback cbargs)))) |
| 154 (if url-history-track | 155 (if url-history-track |
| 155 (url-history-update-url url (current-time))) | 156 (url-history-update-url url (current-time))) |
| 156 buffer)) | 157 buffer)) |
| 157 | 158 |
| 159 ;;;###autoload | |
| 158 (defun url-retrieve-synchronously (url) | 160 (defun url-retrieve-synchronously (url) |
| 159 "Retrieve URL synchronously. | 161 "Retrieve URL synchronously. |
| 160 Return the buffer containing the data, or nil if there are no data | 162 Return the buffer containing the data, or nil if there are no data |
| 161 associated with it (the case for dired, info, or mailto URLs that need | 163 associated with it (the case for dired, info, or mailto URLs that need |
| 162 no further processing). URL is either a string or a parsed URL." | 164 no further processing). URL is either a string or a parsed URL." |