Mercurial > hg > xemacs-beta
comparison lisp/version.el @ 122:d2f30a177268 r20-1b14
Import from CVS: tag r20-1b14
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:26:03 +0200 |
parents | cca96a509cfe |
children | 9b50b4588a93 |
comparison
equal
deleted
inserted
replaced
121:419db647c998 | 122:d2f30a177268 |
---|---|
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 (beta12)"))) | 28 (setq emacs-version (purecopy (concat emacs-version " XEmacs Lucid (beta14)"))) |
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))) |