Mercurial > hg > xemacs-beta

comparison lisp/w3/url-misc.el @ 138:6608ceec7cf8 r20-2b3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-2b3
author cvs
date Mon, 13 Aug 2007 09:31:46 +0200
parents 34a5b81f86ba
children 3d6bfa290dbd
comparison
equal deleted inserted replaced
137:cae984061f40 138:6608ceec7cf8
1 ;;; url-misc.el --- Misc Uniform Resource Locator retrieval code 1 ;;; url-misc.el --- Misc Uniform Resource Locator retrieval code
2 ;; Author: wmperry 2 ;; Author: wmperry
3 ;; Created: 1997/04/16 05:11:58 3 ;; Created: 1997/04/21 23:59:58
4 ;; Version: 1.16 4 ;; Version: 1.17
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 by William M. Perry (wmperry@cs.indiana.edu)
9 ;;; Copyright (c) 1996, 1997 Free Software Foundation, Inc. 9 ;;; Copyright (c) 1996, 1997 Free Software Foundation, Inc.
26 ;;; Boston, MA 02111-1307, USA. 26 ;;; Boston, MA 02111-1307, USA.
27 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 27 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
28 28
29 (require 'url-vars) 29 (require 'url-vars)
30 (require 'url-parse) 30 (require 'url-parse)
31 (require 'widget)
31 (autoload 'Info-goto-node "info" "" t) 32 (autoload 'Info-goto-node "info" "" t)
32 33
33 (defun url-netrek (url) 34 (defun url-netrek (url)
34 ;; Start a netrek client 35 ;; Start a netrek client
35 (if (get-buffer url-working-buffer) 36 (if (get-buffer url-working-buffer)