mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-03 11:33:37 +00:00
Code Issues Releases Activity

* lisp/net/trampver.el: Simplify version check.

Browse Source
This commit is contained in:
Michael Albinus 2018-01-25 12:44:29 +01:00
parent a84c3810b5
commit 421e2fb791
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/net/trampver.el
View File

@ -56,9 +56,8 @@
(let ((x (if (>= emacs-major-version 24)
"ok"
(format "Tramp 2.4.0-pre is not fit for %s"
(when (string-match "^.*$" (emacs-version))
(match-string 0 (emacs-version)))))))
(unless (string-match "\\`ok\\'" x) (error "%s" x)))
(replace-regexp-in-string "\n" "" (emacs-version))))))
(unless (string-equal "ok" x) (error "%s" x)))
;; Tramp versions integrated into Emacs.
(add-to-list