Thank you. I had to apply LANGUAGE as environment variable instead of LANG (even though LANG affects the current-language-environment variable of Emacs). Now it uses English locale and it works.
However, I didn't mange to apply the patch. Emacs is installed via snap and I learned that it is not easy to modify files within snap as it applies a read-only file-format. So I will wait for the next version. Thanks again and regards, bermel Am Freitag, dem 04.02.2022 um 13:59 +0100 schrieb Michael Albinus: > bermel <[email protected]> writes: > > > Debug buffer: > > Thanks. It still uses German locale, though: > > --8<---------------cut here---------------start------------->8--- > > 13:39:08.302097 tramp-call-process (6) # ‘gio info > > davs://[email protected]/’ nil *tramp/davs > > [email protected]* > > 13:39:08.420292 tramp-call-process (6) # 0 > > Anzeigename: / > > Name bearbeiten: / > > Name: / > --8<---------------cut here---------------end--------------->8--- > > Well, the patch to cure it is: > > --8<---------------cut here---------------start------------->8--- > diff --git a/lisp/tramp-gvfs.el b/lisp/tramp-gvfs.el > index 948f3b8..83b5de6 100644 > --- a/lisp/tramp-gvfs.el > +++ b/lisp/tramp-gvfs.el > @@ -2253,13 +2253,7 @@ connection if a previous connection has died > for some reason." > COMMAND is a command from the gvfs-* utilities. It is replaced > by the corresponding gio tool call if available. `call-process' > is applied, and it returns t if the return code is zero." > - (let* ((locale (tramp-get-local-locale vec)) > - (process-environment > - (append > - `(,(format "LANG=%s" locale) > - ,(format "LANGUAGE=%s" locale) > - ,(format "LC_ALL=%s" locale)) > - process-environment))) > + (let ((locale (tramp-get-local-locale vec))) > (when (tramp-gvfs-gio-tool-p vec) > ;; Use gio tool. > (setq args (cons (cdr (assoc command tramp-gvfs-gio-mapping)) > @@ -2269,7 +2263,14 @@ is applied, and it returns t if the return > code is zero." > (with-current-buffer (tramp-get-connection-buffer vec) > (tramp-gvfs-maybe-open-connection vec) > (erase-buffer) > - (or (zerop (apply #'tramp-call-process vec command nil t nil > args)) > + (or (zerop > + (apply > + #'tramp-call-process vec "env" nil t nil > + (append `(,(format "LANG=%s" locale) > + ,(format "LANGUAGE=%s" locale) > + ,(format "LC_ALL=%s" locale) > + ,command) > + args))) > ;; Remove information about mounted connection. > (and (tramp-flush-file-properties vec "/") nil))))) > --8<---------------cut here---------------end--------------->8--- > > I haven't checked whether this applies to Tramp 2.4, but maybe you > give > it a try? > > Best regards, Michael.
