Mercurial > hg > xemacs-beta

comparison lisp/efs/efs-netrc.el @ 116:9f59509498e1 r20-1b10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b10
author cvs
date Mon, 13 Aug 2007 09:23:06 +0200
parents 8b8b7f3559a2
children
comparison
equal deleted inserted replaced
115:f109f7dabbe2 116:9f59509498e1
1 ;; -*-Emacs-Lisp-*- 1 ;; -*-Emacs-Lisp-*-
2 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 2 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
3 ;; 3 ;;
4 ;; File: efs-netrc.el 4 ;; File: efs-netrc.el
5 ;; Release: $efs release: 1.15 $ 5 ;; Release: $efs release: 1.15 $
6 ;; Version: $Revision: 1.2 $ 6 ;; Version: #Revision: 1.2 $
7 ;; RCS: 7 ;; RCS:
8 ;; Description: Parses ~/.netrc file, and does completion in /. 8 ;; Description: Parses ~/.netrc file, and does completion in /.
9 ;; Author: Sandy Rutherford <sandy@ibm550.sissa.it> 9 ;; Author: Sandy Rutherford <sandy@ibm550.sissa.it>
10 ;; Created: Fri Jan 28 19:32:47 1994 by sandy on ibm550 10 ;; Created: Fri Jan 28 19:32:47 1994 by sandy on ibm550
11 ;; Language: Emacs-Lisp 11 ;; Language: Emacs-Lisp
30 ;;;; ------------------------------------------------------------ 30 ;;;; ------------------------------------------------------------
31 31
32 (defconst efs-netrc-version 32 (defconst efs-netrc-version
33 (concat (substring "$efs release: 1.15 $" 14 -2) 33 (concat (substring "$efs release: 1.15 $" 14 -2)
34 "/" 34 "/"
35 (substring "$Revision: 1.2 $" 11 -2))) 35 (substring "#Revision: 1.2 $" 11 -2)))
36 36
37 ;; Make the byte compiler happy. 37 ;; Make the byte compiler happy.
38 (defvar dired-directory) 38 (defvar dired-directory)
39 39
40 ;;;; ------------------------------------------------------------ 40 ;;;; ------------------------------------------------------------