]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/net/trampver.el: Simplify version check.
authorMichael Albinus <michael.albinus@gmx.de>
Thu, 25 Jan 2018 11:44:29 +0000 (12:44 +0100)
committerMichael Albinus <michael.albinus@gmx.de>
Thu, 25 Jan 2018 11:44:29 +0000 (12:44 +0100)
lisp/net/trampver.el

index a9c9b0d751b71ee444bfc6348e5579e9f7281f94..46af51ebfdb337b24e4ce42447db20b6fe7edb45 100644 (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