Mercurial > hg > xemacs-beta
comparison lisp/version.el @ 108:360340f9fd5f r20-1b6
Import from CVS: tag r20-1b6
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:18:39 +0200 |
parents | 8ff55ebd4be9 |
children | fe104dbd9147 |
comparison
equal
deleted
inserted
replaced
107:523141596bda | 108:360340f9fd5f |
---|---|
23 ;;; Code: | 23 ;;; Code: |
24 | 24 |
25 (defconst emacs-version "20.1" | 25 (defconst emacs-version "20.1" |
26 "Version numbers of this version of Emacs.") | 26 "Version numbers of this version of Emacs.") |
27 | 27 |
28 (setq emacs-version (purecopy (concat emacs-version " XEmacs Lucid (beta5)"))) | 28 (setq emacs-version (purecopy (concat emacs-version " XEmacs Lucid (beta6)"))) |
29 | 29 |
30 (defconst emacs-major-version | 30 (defconst emacs-major-version |
31 (progn (or (string-match "^[0-9]+" emacs-version) | 31 (progn (or (string-match "^[0-9]+" emacs-version) |
32 (error "emacs-version unparsable")) | 32 (error "emacs-version unparsable")) |
33 (string-to-int (match-string 0 emacs-version))) | 33 (string-to-int (match-string 0 emacs-version))) |