Mercurial > hg > xemacs-beta
comparison lisp/efs/efs-cu.el @ 24:4103f0995bd7 r19-15b95
Import from CVS: tag r19-15b95
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:51:03 +0200 |
parents | 8fc7fe29b841 |
children | 7e54bd776075 |
comparison
equal
deleted
inserted
replaced
23:0edd3412f124 | 24:4103f0995bd7 |
---|---|
1 ;; -*-Emacs-Lisp-*- | 1 ;; -*-Emacs-Lisp-*- |
2 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 2 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
3 ;; | 3 ;; |
4 ;; File: efs-cu.el | 4 ;; File: efs-cu.el |
5 ;; Release: $efs release: 1.15 $ | 5 ;; Release: $efs release: 1.15 $ |
6 ;; Version: $Revision: 1.1 $ | 6 ;; Version: $Revision: 1.12 $ |
7 ;; RCS: | 7 ;; RCS: |
8 ;; Description: Common utilities needed by efs files. | 8 ;; Description: Common utilities needed by efs files. |
9 ;; Author: Sandy Rutherford <sandy@ibm550.sissa.it> | 9 ;; Author: Sandy Rutherford <sandy@ibm550.sissa.it> |
10 ;; Created: Fri Jan 28 19:55:45 1994 by sandy on ibm550 | 10 ;; Created: Fri Jan 28 19:55:45 1994 by sandy on ibm550 |
11 ;; Language: Emacs-Lisp | 11 ;; Language: Emacs-Lisp |
53 ;;;; ------------------------------------------------------------- | 53 ;;;; ------------------------------------------------------------- |
54 | 54 |
55 (defconst efs-cu-version | 55 (defconst efs-cu-version |
56 (concat (substring "$efs release: 1.15 $" 14 -2) | 56 (concat (substring "$efs release: 1.15 $" 14 -2) |
57 "/" | 57 "/" |
58 (substring "$Revision: 1.1 $" 11 -2))) | 58 (substring "$Revision: 1.12 $" 11 -2))) |
59 | 59 |
60 (defconst efs-case-insensitive-host-types | 60 (defconst efs-case-insensitive-host-types |
61 '(vms cms mts ti-twenex ti-explorer dos mvs tops-20 mpe ka9q dos-distinct | 61 '(vms cms mts ti-twenex ti-explorer dos mvs tops-20 mpe ka9q dos-distinct |
62 os2 hell guardian ms-unix netware cms-knet nos-ve) | 62 os2 hell guardian ms-unix netware cms-knet nos-ve) |
63 "List of host types for which case is insignificant in file names.") | 63 "List of host types for which case is insignificant in file names.") |