diff options
| author | Craig Jennings <c@cjennings.net> | 2026-05-11 18:17:22 -0500 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2026-05-11 18:17:22 -0500 |
| commit | e0e0ecdb86e3ae1772adcedb50e6c9caa210cf17 (patch) | |
| tree | 41a16c890b1ffb588635266d45fc484beb85f9de /tests/test-lorem-optimum.el | |
| parent | fc94e5b7101f6677950c414c2822b451351ccc56 (diff) | |
| download | dotemacs-e0e0ecdb86e3ae1772adcedb50e6c9caa210cf17.tar.gz dotemacs-e0e0ecdb86e3ae1772adcedb50e6c9caa210cf17.zip | |
test: close coverage gaps from the preceding batch
Untested paths surfaced while reviewing the preceding feature/fix commits:
- calendar-sync: a test that `-L' precedes `-l' in the worker command (separate `member' checks wouldn't catch a swap), plus a `:slow' tag on the real-subprocess worker test so it stays out of the default `make test' run.
- org-capture cache: a killed marker buffer invalidates the entry and the next resolution rescans without erroring on the stale marker, `cj/org-capture-clear-target-cache' actually empties the hash, and non-`file+headline' targets (`file', `file+olp', `file+function') fall through to the original `org-capture-set-target-location'.
- lorem-optimum: `cj/lipsum-title' on an empty chain returns "", not an error.
- calibredb-epub: a negative `cj/nov-margin-percent' is clamped up to 0 (text takes the full window width).
- mu4e attachments: the default save directory comes from the part's `:target-dir' and falls back to `~/Downloads/', and asking for the attachment at point on a header line fails with a `user-error'.
Diffstat (limited to 'tests/test-lorem-optimum.el')
| -rw-r--r-- | tests/test-lorem-optimum.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/test-lorem-optimum.el b/tests/test-lorem-optimum.el index 40bdc684..f928c972 100644 --- a/tests/test-lorem-optimum.el +++ b/tests/test-lorem-optimum.el @@ -247,5 +247,11 @@ (should (> (length result) 0)) (should (string-match-p "^[[:upper:]]" result))))) +(ert-deftest test-title-generation-empty-chain-returns-empty-string () + "Boundary: an empty Markov chain (`cj/markov-random-key' returns nil) yields +an empty string, not an error." + (let ((cj/lipsum-chain (cj/markov-chain-create))) + (should (equal "" (cj/lipsum-title))))) + (provide 'test-lorem-optimum) ;;; test-lorem-optimum.el ends here |
