[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master b1b99ed: Minor tweak in a dired test
From: |
Tino Calancha |
Subject: |
[Emacs-diffs] master b1b99ed: Minor tweak in a dired test |
Date: |
Sun, 6 Aug 2017 09:19:25 -0400 (EDT) |
branch: master
commit b1b99edd3ee587a5154106d4d16547eac4916c55
Author: Tino Calancha <address@hidden>
Commit: Tino Calancha <address@hidden>
Minor tweak in a dired test
* test/lisp/dired-tests.el (dired-test-bug27968):
Ensure the new header has different length than the original one.
---
test/lisp/dired-tests.el | 8 ++++++--
1 file changed, 6 insertions(+), 2 deletions(-)
diff --git a/test/lisp/dired-tests.el b/test/lisp/dired-tests.el
index 105a79f..981afdd 100644
--- a/test/lisp/dired-tests.el
+++ b/test/lisp/dired-tests.el
@@ -333,9 +333,13 @@
(save-excursion
(goto-char 1)
(forward-line 1)
- (let ((inhibit-read-only t))
+ (let ((inhibit-read-only t)
+ (new-header " test-bug27968"))
(delete-region (point) (point-at-eol))
- (insert " test-bug27968")))
+ (when (= orig-len (length new-header))
+ ;; Wow lucky guy! I must buy lottery today.
+ (setq new-header (concat new-header " :-)")))
+ (insert new-header)))
(setq len (funcall header-len-fn)
diff (- len orig-len))
(should-not (zerop diff)) ; Header length has changed.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master b1b99ed: Minor tweak in a dired test,
Tino Calancha <=