Mercurial > hg > xemacs-beta
diff lisp/efs/efs-pc.el @ 114:8619ce7e4c50 r20-1b9
Import from CVS: tag r20-1b9
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:21:54 +0200 |
parents | 8fc7fe29b841 |
children | 9f59509498e1 |
line wrap: on
line diff
--- a/lisp/efs/efs-pc.el Mon Aug 13 09:20:50 2007 +0200 +++ b/lisp/efs/efs-pc.el Mon Aug 13 09:21:54 2007 +0200 @@ -3,7 +3,7 @@ ;; ;; File: efs-pc.el ;; Release: $efs release: 1.15 $ -;; Version: $Revision: 1.1 $ +;; Version: $Revision: 1.2 $ ;; RCS: ;; Description: PC support for efs ;; Author: Sandy Rutherford <sandy@tsmi19.sissa.it> @@ -31,7 +31,7 @@ (defconst efs-pc-version (concat (substring "$efs release: 1.15 $" 14 -2) "/" - (substring "$Revision: 1.1 $" 11 -2))) + (substring "$Revision: 1.2 $" 11 -2))) ;;;----------------------------------------------------------------- ;;; PC support for efs @@ -260,7 +260,7 @@ ;; Neither DOS nor OS/2 allows us to end the name of a directory ;; with an "\". ;; Adding *.* to the end also allows us to distinguish plain files from - ;; directries. All DOS servers seem to understand this except + ;; directories. All DOS servers seem to understand this except ;; Frontier Technologies' super-tcp server. ((string-match "/$" dir-path) (concat (efs-fix-pc-path dir-path) "*.*"))