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

Minor fix in tramp-test32-shell-command

Browse source 
* test/lisp/net/tramp-tests.el (tramp-test32-shell-command):
Set `default-directory'.
This commit is contained in:
Michael Albinus 2020-02-05 11:41:14 +01:00
parent 6b00600647
commit 196da3017b
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
test/lisp/net/tramp-tests.el
View file

@ -4541,6 +4541,7 @@ INPUT, if non-nil, is a string sent to the process."
;; but seems to work since Emacs 27.1 only.
(when (and (tramp--test-sh-p) (tramp--test-emacs27-p))
(let* ((async-shell-command-width 1024)
(default-directory tramp-test-temporary-file-directory)
(cols (ignore-errors
(read (tramp--test-shell-command-to-string-asynchronously
"tput cols")))))
@ -5844,7 +5845,7 @@ Use the `ls' command."
;; Since Emacs 27.1.
(skip-unless (fboundp 'file-system-info))
;; `file-system-info' exists since Emacs 27. We don't want to see
;; `file-system-info' exists since Emacs 27.1. We don't want to see
;; compiler warnings for older Emacsen.
(let ((fsi (with-no-warnings
(file-system-info tramp-test-temporary-file-directory))))