summaryrefslogtreecommitdiff
path: root/test/lisp/eshell/em-ls-tests.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2018-12-13 13:41:19 -0500
committerGlenn Morris <rgm@gnu.org>2018-12-13 13:41:19 -0500
commitef922e774ae33772ad86403332ddb5a1b49d268e (patch)
tree7a532f6c5fb7326e4832e5d12e9c96edce751bdc /test/lisp/eshell/em-ls-tests.el
parent8ffc0f2dd753879b0795714c29c86082aa9fd155 (diff)
downloademacs-ef922e774ae33772ad86403332ddb5a1b49d268e.tar.gz
* test/lisp/eshell/em-ls-tests.el (em-ls-test-bug27844): Add debug.
Diffstat (limited to 'test/lisp/eshell/em-ls-tests.el')
-rw-r--r--test/lisp/eshell/em-ls-tests.el9
1 files changed, 9 insertions, 0 deletions
diff --git a/test/lisp/eshell/em-ls-tests.el b/test/lisp/eshell/em-ls-tests.el
index ea9dbff48fc..b89a54641bd 100644
--- a/test/lisp/eshell/em-ls-tests.el
+++ b/test/lisp/eshell/em-ls-tests.el
@@ -94,6 +94,15 @@
(should (cdr (dired-get-marked-files)))
(kill-buffer buf)
(setq buf (dired (expand-file-name "lisp/subr.el" source-directory)))
+ (when (getenv "EMACS_HYDRA_CI")
+ (message "X1%s" (buffer-substring-no-properties
+ (point-min) (point-max)))
+ (message "X2%s" (buffer-substring-no-properties
+ (line-beginning-position)
+ (line-end-position)))
+ (message "X3%s" (buffer-substring-no-properties
+ (point)
+ (line-end-position))))
(should (looking-at "subr\\.el")))
(customize-set-variable 'eshell-ls-use-in-dired orig)
(and (buffer-live-p buf) (kill-buffer)))))