From 1338b2ae757b7143fe4d211fc5a354c73cee526b Mon Sep 17 00:00:00 2001 From: Craig Jennings Date: Tue, 26 May 2026 18:09:21 -0500 Subject: chore: coverage, autoload fix, and internal cleanup for org-drill A batch of test-coverage and hardening work, squashed from the test-work branch. Tests: deduplicated a colliding leitner-capture test name so make test-name loads again. Added SM2 assert-failure cases, the six basic multicloze variant delegations, the three English-side spanish-verb branches, and org-drill-current-scope branch coverage. Fix: the entry-point commands (org-drill itself, cram-tree, tree, directory, resume, relearn-item, strip-all-data, merge-buffers) carried no autoload cookies, so M-x failed from a fresh install until something pulled the file in. They're autoloaded now. Perf: org-drill-shuffle was quadratic because it indexed a list with elt on every swap. It runs a linear Fisher-Yates pass over a vector now, and it checks its argument is a list. Feat: added org-drill-version, a constant plus an interactive command, so a bug reporter doesn't have to open the file header. Refactor: extracted org-drill--format-tense-mood, shared by the two verb-conjugation presenters that each carried a copy. Docs: explained the SM8 magic numbers in the simple8 helpers as empirical fits rather than tunable knobs. --- tests/test-org-drill-final-helpers.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'tests/test-org-drill-final-helpers.el') diff --git a/tests/test-org-drill-final-helpers.el b/tests/test-org-drill-final-helpers.el index c9cb0a3..b09efb7 100644 --- a/tests/test-org-drill-final-helpers.el +++ b/tests/test-org-drill-final-helpers.el @@ -111,8 +111,8 @@ matches leitner-tagged entries)." (should (null org-drill-leitner-boxed-entries)) (should (null org-drill-leitner-unboxed-entries)))))) -(ert-deftest test-map-leitner-capture-non-drill-entry-skipped () - "Non-drill entries (no :drill: tag inheritance) are skipped silently." +(ert-deftest test-map-leitner-capture-untagged-heading-skipped () + "A heading carrying no drill/leitner tag is skipped silently." (with-org-buffer "* Plain heading\n" (let ((session (org-drill-session)) (org-drill-leitner-boxed-entries nil) -- cgit v1.2.3