# HG changeset patch # User Michael Albinus # Date 1245704935 0 # Node ID 898b2151d69f228133f9aad4c9a2b6a26e22d6ce # Parent 74d482177a4424cd5e23970964071fdc4c943bb6 * net/trampver.el: Update release number. Make version check fit for SXEmacs 22. diff -r 74d482177a44 -r 898b2151d69f lisp/net/trampver.el --- a/lisp/net/trampver.el Mon Jun 22 21:08:29 2009 +0000 +++ b/lisp/net/trampver.el Mon Jun 22 21:08:55 2009 +0000 @@ -29,14 +29,14 @@ ;; "autoconf && ./configure" to change them. (X)Emacs version check is defined ;; in macro AC_EMACS_INFO of aclocal.m4; should be changed only there. -(defconst tramp-version "2.1.15" +(defconst tramp-version "2.1.16" "This version of Tramp.") (defconst tramp-bug-report-address "tramp-devel@gnu.org" "Email address to send bug reports to.") ;; Check for (X)Emacs version. -(let ((x (if (or (< emacs-major-version 21) (and (featurep 'xemacs) (< emacs-minor-version 4))) (format "Tramp 2.1.15 is not fit for %s" (when (string-match "^.*$" (emacs-version)) (match-string 0 (emacs-version)))) "ok"))) +(let ((x (if (or (< emacs-major-version 21) (and (featurep 'xemacs) (= emacs-major-version 21) (< emacs-minor-version 4))) (format "Tramp 2.1.16 is not fit for %s" (when (string-match "^.*$" (emacs-version)) (match-string 0 (emacs-version)))) "ok"))) (unless (string-match "\\`ok\\'" x) (error "%s" x))) (provide 'trampver)