[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/net trampver.el
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] emacs/lisp/net trampver.el |
Date: |
Mon, 22 Jun 2009 21:08:55 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Michael Albinus <albinus> 09/06/22 21:08:55
Modified files:
lisp/net : trampver.el
Log message:
* net/trampver.el: Update release number. Make version check fit
for SXEmacs 22.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/net/trampver.el?cvsroot=emacs&r1=1.52&r2=1.53
Patches:
Index: trampver.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/trampver.el,v
retrieving revision 1.52
retrieving revision 1.53
diff -u -b -r1.52 -r1.53
--- trampver.el 1 Feb 2009 10:44:39 -0000 1.52
+++ trampver.el 22 Jun 2009 21:08:55 -0000 1.53
@@ -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 "address@hidden"
"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)
- [Emacs-diffs] emacs/lisp/net trampver.el,
Michael Albinus <=