From 421e2fb791f6d203642c2d3d0e7e2eb1e66a0ab0 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Thu, 25 Jan 2018 12:44:29 +0100 Subject: [PATCH] * lisp/net/trampver.el: Simplify version check. --- lisp/net/trampver.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/net/trampver.el b/lisp/net/trampver.el index a9c9b0d751b..46af51ebfdb 100644 --- a/lisp/net/trampver.el +++ b/lisp/net/trampver.el @@ -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 -- 2.39.5