From 40892b46f8219e4c7795038f91878f85eaeb7bc5 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Sat, 3 Oct 2015 10:09:41 +0200 Subject: [PATCH] ; Tramp: Suppress compiler warnings. --- lisp/net/trampver.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/net/trampver.el b/lisp/net/trampver.el index ab671204e32..bba27e39469 100644 --- a/lisp/net/trampver.el +++ b/lisp/net/trampver.el @@ -42,7 +42,8 @@ "Try to return as a string the repository revision of the Tramp sources." (unless (featurep 'xemacs) (let ((dir - (funcall 'locate-dominating-file (locate-library "tramp") ".git"))) + (funcall + (intern "locate-dominating-file") (locate-library "tramp") ".git"))) (when dir (with-temp-buffer (let ((default-directory (file-name-as-directory dir))) @@ -50,7 +51,8 @@ (ignore-errors (call-process "git" nil '(t nil) nil "rev-parse" "HEAD"))) (not (zerop (buffer-size))) - (tramp-compat-replace-regexp-in-string + (funcall + (intern "tramp-compat-replace-regexp-in-string") "\n" "" (buffer-string))))))))) ;; Check for (X)Emacs version. -- 2.39.2