Mercurial > hg > xemacs-beta
comparison lisp/version.el @ 155:43dd3413c7c7 r20-3b4
Import from CVS: tag r20-3b4
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:39:39 +0200 |
parents | 25f70ba0133c |
children | 6b37e6ddd302 |
comparison
equal
deleted
inserted
replaced
154:94141801dd7e | 155:43dd3413c7c7 |
---|---|
23 ;;; Code: | 23 ;;; Code: |
24 | 24 |
25 (defconst emacs-version "20.3" | 25 (defconst emacs-version "20.3" |
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 (beta3)"))) | 28 (setq emacs-version (purecopy (concat emacs-version " XEmacs Lucid (beta4)"))) |
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))) |