diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2014-10-31 02:08:13 -0400 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2014-11-01 01:21:31 -0400 |
| commit | b9c2f006c8a8a4358ac30fec7c7523da8ff5350f (patch) | |
| tree | 50845540548e9c305741856a599df05d36cb1041 /bog-tests.el | |
| parent | 954a8b47936374dea7e198a38b2a03ba4843d9c6 (diff) | |
| download | bog-b9c2f006c8a8a4358ac30fec7c7523da8ff5350f.tar.gz | |
Rework citekey collection
- Split into two functions instead of having no-sort argument.
- Use push instead of add-to-list.
Diffstat (limited to 'bog-tests.el')
| -rw-r--r-- | bog-tests.el | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/bog-tests.el b/bog-tests.el index 3bc5781..022275e 100644 --- a/bog-tests.el +++ b/bog-tests.el @@ -274,18 +274,12 @@ ;; `bog-collect-references' -(ert-deftest bog-collect-references () +(ert-deftest bog-collect-unique-references () (with-temp-buffer (insert "abc1900word\nhij2000word\nefg1800word\n") - (should (equal (bog-collect-references) + (should (equal (bog-collect-unique-references) '("abc1900word" "efg1800word" "hij2000word"))))) -(ert-deftest bog-collect-references-no-sort () - (with-temp-buffer - (insert "abc1900word\nhij2000word\nefg1800word\n") - (should (equal (bog-collect-references t) - '("efg1800word" "hij2000word" "abc1900word"))))) - ;; `bog-sort-topic-headings-in-buffer' (ert-deftest bog-sort-topic-headings-in-buffer () |