Mercurial > hg > xemacs-beta

comparison lisp/efs/efs-ti-explorer.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 8619ce7e4c50
children 538048ae2ab8
comparison
equal deleted inserted replaced
115:f109f7dabbe2 116:9f59509498e1
1 ;; -*-Emacs-Lisp-*- 1 ;; -*-Emacs-Lisp-*-
2 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 2 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
3 ;; 3 ;;
4 ;; File: efs-ti-explorer.el 4 ;; File: efs-ti-explorer.el
5 ;; Release: $efs release: 1.15 $ 5 ;; Release: $efs release: 1.15 $
6 ;; Version: $Revision: 1.2 $ 6 ;; Version: #Revision: 1.1 $
7 ;; RCS: 7 ;; RCS:
8 ;; Description: Explorer support for efs 8 ;; Description: Explorer support for efs
9 ;; Author: Jamie Zawinski <jwz@lucid.com> 9 ;; Author: Jamie Zawinski <jwz@lucid.com>
10 ;; Created: Thu Dec 17 15:04:14 1992 10 ;; Created: Thu Dec 17 15:04:14 1992
11 ;; Modified: Sun Nov 27 18:42:47 1994 by sandy on gandalf 11 ;; Modified: Sun Nov 27 18:42:47 1994 by sandy on gandalf
20 (require 'efs) 20 (require 'efs)
21 21
22 (defconst efs-ti-explorer-version 22 (defconst efs-ti-explorer-version
23 (concat (substring "$efs release: 1.15 $" 14 -2) 23 (concat (substring "$efs release: 1.15 $" 14 -2)
24 "/" 24 "/"
25 (substring "$Revision: 1.2 $" 11 -2))) 25 (substring "#Revision: 1.1 $" 11 -2)))
26 26
27 ;;;; ------------------------------------------------------------ 27 ;;;; ------------------------------------------------------------
28 ;;;; Explorer support. 28 ;;;; Explorer support.
29 ;;;; ------------------------------------------------------------ 29 ;;;; ------------------------------------------------------------
30 30