diff options
author | Glenn Morris <rgm@gnu.org> | 2018-12-13 13:41:19 -0500 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2018-12-13 13:41:19 -0500 |
commit | ef922e774ae33772ad86403332ddb5a1b49d268e (patch) | |
tree | 7a532f6c5fb7326e4832e5d12e9c96edce751bdc | |
parent | 8ffc0f2dd753879b0795714c29c86082aa9fd155 (diff) | |
download | emacs-ef922e774ae33772ad86403332ddb5a1b49d268e.tar.gz |
* test/lisp/eshell/em-ls-tests.el (em-ls-test-bug27844): Add debug.
-rw-r--r-- | test/lisp/eshell/em-ls-tests.el | 9 |
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))))) |