Mercurial > emacs

comparison lisp/url/url-parse.el @ 54698:ee631551cb0a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Don't require url-auto.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sun, 04 Apr 2004 03:10:58 +0000
parents 3fb37923e567
children 7784ae10206d
comparison
equal deleted inserted replaced
54697:e9a90978bc47 54698:ee631551cb0a
1 ;;; url-parse.el --- Uniform Resource Locator parser 1 ;;; url-parse.el --- Uniform Resource Locator parser
2 ;; Author: $Author: fx $ 2 ;; Author: $Author: monnier $
3 ;; Created: $Date: 2001/10/01 11:52:06 $ 3 ;; Created: $Date: 2004/04/04 01:21:46 $
4 ;; Version: $Revision: 1.4 $ 4 ;; Version: $Revision: 1.1.1.1 $
5 ;; Keywords: comm, data, processes 5 ;; Keywords: comm, data, processes
6 6
7 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 7 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
8 ;;; Copyright (c) 1993 - 1996 by William M. Perry <wmperry@cs.indiana.edu> 8 ;;; Copyright (c) 1993 - 1996, 2004 by William M. Perry <wmperry@cs.indiana.edu>
9 ;;; Copyright (c) 1996 - 1999 Free Software Foundation, Inc. 9 ;;; Copyright (c) 1996 - 1999 Free Software Foundation, Inc.
10 ;;; 10 ;;;
11 ;;; This file is part of GNU Emacs. 11 ;;; This file is part of GNU Emacs.
12 ;;; 12 ;;;
13 ;;; GNU Emacs is free software; you can redistribute it and/or modify 13 ;;; GNU Emacs is free software; you can redistribute it and/or modify
23 ;;; You should have received a copy of the GNU General Public License 23 ;;; You should have received a copy of the GNU General Public License
24 ;;; along with GNU Emacs; see the file COPYING. If not, write to the 24 ;;; along with GNU Emacs; see the file COPYING. If not, write to the
25 ;;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, 25 ;;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
26 ;;; Boston, MA 02111-1307, USA. 26 ;;; Boston, MA 02111-1307, USA.
27 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 27 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
28 (require 'url-auto)
29 (require 'url-vars) 28 (require 'url-vars)
30 29
31 (autoload 'url-scheme-get-property "url-methods") 30 (autoload 'url-scheme-get-property "url-methods")
32 31
33 (defmacro url-type (urlobj) 32 (defmacro url-type (urlobj)