procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/net/tramp-sh.el (tramp-sh-gio-monitor-process-filter):

Browse source 
Make assumption for emba.
This commit is contained in:
Michael Albinus 2021-03-31 21:09:55 +02:00
parent f236b516b6
commit 0f5bd3b7fa
1 changed files with 11 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
lisp/net/tramp-sh.el
View file

@ -3740,6 +3740,8 @@ Fall back to normal file name handler if no Tramp handler exists."
"changes done" "changes-done-hint" string)
string (tramp-compat-string-replace
"renamed to" "moved" string))
(when (getenv "EMACS_EMBA_CI")
(message "%s" string))
(catch 'doesnt-work
;; https://bugs.launchpad.net/bugs/1742946
@ -3750,15 +3752,18 @@ Fall back to normal file name handler if no Tramp handler exists."
;; Determine monitor name.
(unless (tramp-connection-property-p proc "gio-file-monitor")
(when (getenv "EMACS_EMBA_CI")
(message "%s" string))
(cond
;; We have seen this only on cygwin gio, which uses the
;; GPollFileMonitor.
;; We have seen this on cygwin gio and on emba. Let's make some assumptions.
((string-match
"Can't find module 'help' specified in GIO_USE_FILE_MONITOR" string)
(tramp-set-connection-property
proc "gio-file-monitor" 'GPollFileMonitor))
(cond
((getenv "EMACS_EMBA_CI")
(tramp-set-connection-property
proc "gio-file-monitor" 'GInotifyMonitor))
((eq system-type 'cygwin)
(tramp-set-connection-property
proc "gio-file-monitor" 'GPollFileMonitor))
(t (tramp-error proc 'file-error "Cannot determine gio monitor"))))
;; TODO: What happens, if several monitor names are reported?
((string-match "\
Supported arguments for GIO_USE_FILE_MONITOR environment variable: