Mercurial > hg > xemacs-beta
comparison lisp/version.el @ 76:c0c698873ce1 r20-0b33
Import from CVS: tag r20-0b33
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:05:10 +0200 |
parents | 54cc21c15cbb |
children | c7528f8e288d |
comparison
equal
deleted
inserted
replaced
75:a4e0195b387b | 76:c0c698873ce1 |
---|---|
23 ;;; Code: | 23 ;;; Code: |
24 | 24 |
25 (defconst emacs-version "20.0" | 25 (defconst emacs-version "20.0" |
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 (beta32)"))) | 28 (setq emacs-version (purecopy (concat emacs-version " XEmacs Lucid (beta33)"))) |
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))) |