Mercurial > emacs

comparison lisp/net/trampver.el @ 105898:5eb4659b2752

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* net/trampver.el: Update release number.
author Michael Albinus <michael.albinus@gmx.de>
date Sat, 07 Nov 2009 23:56:24 +0000
parents 17c6a23b322b
children 0cbe044d923b
comparison
equal deleted inserted replaced
105897:d8ba90718d44 105898:5eb4659b2752
27 ;; In the Tramp CVS repository, the version numer and the bug report address 27 ;; In the Tramp CVS repository, the version numer and the bug report address
28 ;; are auto-frobbed from configure.ac, so you should edit that file and run 28 ;; are auto-frobbed from configure.ac, so you should edit that file and run
29 ;; "autoconf && ./configure" to change them. (X)Emacs version check is defined 29 ;; "autoconf && ./configure" to change them. (X)Emacs version check is defined
30 ;; in macro AC_EMACS_INFO of aclocal.m4; should be changed only there. 30 ;; in macro AC_EMACS_INFO of aclocal.m4; should be changed only there.
31 31
32 (defconst tramp-version "2.1.17-pre" 32 (defconst tramp-version "2.1.17"
33 "This version of Tramp.") 33 "This version of Tramp.")
34 34
35 (defconst tramp-bug-report-address "tramp-devel@gnu.org" 35 (defconst tramp-bug-report-address "tramp-devel@gnu.org"
36 "Email address to send bug reports to.") 36 "Email address to send bug reports to.")
37 37
38 ;; Check for (X)Emacs version. 38 ;; Check for (X)Emacs version.
39 (let ((x (if (or (< emacs-major-version 21) (and (featurep 'xemacs) (= emacs-major-version 21) (< emacs-minor-version 4))) (format "Tramp 2.1.17-pre is not fit for %s" (when (string-match "^.*$" (emacs-version)) (match-string 0 (emacs-version)))) "ok"))) 39 (let ((x (if (or (< emacs-major-version 21) (and (featurep 'xemacs) (= emacs-major-version 21) (< emacs-minor-version 4))) (format "Tramp 2.1.17 is not fit for %s" (when (string-match "^.*$" (emacs-version)) (match-string 0 (emacs-version)))) "ok")))
40 (unless (string-match "\\`ok\\'" x) (error "%s" x))) 40 (unless (string-match "\\`ok\\'" x) (error "%s" x)))
41 41
42 (provide 'trampver) 42 (provide 'trampver)
43 43
44 ;; arch-tag: 443576ca-f8f1-4bb1-addc-5c70861e93b1 44 ;; arch-tag: 443576ca-f8f1-4bb1-addc-5c70861e93b1