diff options
author | Arun Isaac | 2022-07-07 02:19:25 +0530 |
---|---|---|
committer | Arun Isaac | 2022-07-07 02:26:08 +0530 |
commit | f783abafa220124817a2782430cb63c9f3511d15 (patch) | |
tree | c0e26281ec48314cbd573a44ce40e6f3ddafc927 /tests/issue.scm | |
parent | dc6e932000730ede3c23a270390db9482953b41a (diff) | |
download | tissue-f783abafa220124817a2782430cb63c9f3511d15.tar.gz tissue-f783abafa220124817a2782430cb63c9f3511d15.tar.lz tissue-f783abafa220124817a2782430cb63c9f3511d15.zip |
issue: Parse known keys in list lines even if they are long.
We drop the restriction that values in key-value pairs should be 2
words or less. Instead, if the key is a known key such as "keywords:",
"tags:" or "status:", we always accept it as a key.
* tissue/issue.scm (file-details): Parse known keys in list lines even
if they are long.
* tests/issue.scm ("Parse keywords even if they are long"): New test.
Diffstat (limited to 'tests/issue.scm')
-rw-r--r-- | tests/issue.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/issue.scm b/tests/issue.scm index 74fb6c3..22982db 100644 --- a/tests/issue.scm +++ b/tests/issue.scm @@ -70,4 +70,9 @@ (call-with-input-string "* term: This is a definition of term." (compose hashtable->alist file-details))) +(test-equal "Parse keywords even if they are long" + '((keywords "this is a long keyword")) + (call-with-input-string "* keywords: this is a long keyword" + (compose hashtable->alist file-details))) + (test-end "issue") |