bug-global
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: client on freebsd over tramp server on archlinux


From: andrés ramírez
Subject: Re: client on freebsd over tramp server on archlinux
Date: Thu, 22 Oct 2020 14:56:04 +0000

Hi Michael. Hi Shigio.

>>>>> "INKA" == andrés ramírez <rrandresf@gmail.com> writes:

    INKA> Hi. Michael.
>>>>> "Michael" == Michael Albinus <michael.albinus@gmx.de> writes:

    Michael> Shigio YAMAGUCHI <shigio@gnu.org> writes: Hi,


[...]

    Michael> (concat (file-remote-p default-directory) path)

    INKA> I have edebugged it. and the running-path for this case does not use 
rootdir. So. Let's
    INKA> skip it by now. Talking about it later. Just We would need to remind 
it.

I need to correct myself. That path is used. But It did not need any
change. See Below.

I have done this changes:
--8<---------------cut here---------------start------------->8---
diff -u /usr/share/emacs/site-lisp/gtags.el 
/home/freebsd/mymnt/global_test/lisp/gtags.el
--- /usr/share/emacs/site-lisp/gtags.el 2020-10-20 18:40:27.466980000 +0000
+++ /home/freebsd/mymnt/global_test/lisp/gtags.el       2020-10-22 
14:10:22.000000000 +0000
@@ -798,7 +798,7 @@
     (set-buffer buffer)
     (message "Searching %s ..." tagname)
     (let (status)
-      (gtags-push-tramp-environment)
+      ;(gtags-push-tramp-environment)
       ;
       ; Path style is defined in gtags-path-style:
       ;   root: relative from the root of the project (Default)
@@ -816,9 +816,9 @@
            (setq rootdir (gtags-get-rootpath)))
           (if rootdir (cd rootdir)))))
       (setq status (if (equal flag "C")
-                      (call-process gtags-global-command nil t nil option 
"--encode-path=\" \t\"" context tagname)
-                      (call-process gtags-global-command nil t nil option 
"--encode-path=\" \t\"" tagname)))
-      (gtags-pop-tramp-environment)
+                      (process-file gtags-global-command nil t nil option 
"--encode-path=\" \t\"" context tagname)
+                      (process-file gtags-global-command nil t nil option 
"--encode-path=\" \t\"" tagname)))
+      ;(gtags-pop-tramp-environment)
       (if (not (= 0 status))
           (progn (message (buffer-substring (point-min)(1- (point-max))))
             (gtags-pop-context))

Diff finished.  Thu Oct 22 14:13:27 2020
--8<---------------cut here---------------end--------------->8---

And it is WORKING pretty fine. I have not tested multihops yet.

What Do You think Guys?

Michael. Why the change on 'gtags-get-rootpath' was not needed?

Best Regards



reply via email to

[Prev in Thread] Current Thread [Next in Thread]