emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master ef922e7: * test/lisp/eshell/em-ls-tests.el (em-ls-t


From: Glenn Morris
Subject: [Emacs-diffs] master ef922e7: * test/lisp/eshell/em-ls-tests.el (em-ls-test-bug27844): Add debug.
Date: Thu, 13 Dec 2018 13:41:55 -0500 (EST)

branch: master
commit ef922e774ae33772ad86403332ddb5a1b49d268e
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    * test/lisp/eshell/em-ls-tests.el (em-ls-test-bug27844): Add debug.
---
 test/lisp/eshell/em-ls-tests.el | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/test/lisp/eshell/em-ls-tests.el b/test/lisp/eshell/em-ls-tests.el
index ea9dbff..b89a546 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)))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]