diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-01-26 14:52:21 -0200 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-01-26 14:52:21 -0200 |
| commit | 6f83f1ef10f1316b489eba926aebecb51f37a6e7 (patch) | |
| tree | d00a4462b8a17baad869636e430fe4869ada4c7f /test | |
| parent | aba5271db6bd54385cdef62d66cd88a606ea3c6d (diff) | |
Fix test
Diffstat (limited to 'test')
| -rw-r--r-- | test/test-printing.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/test/test-printing.el b/test/test-printing.el index 52fe5be..a6815e2 100644 --- a/test/test-printing.el +++ b/test/test-printing.el @@ -13,7 +13,7 @@ (defmacro question-list-regex (title votes answers &rest tags) "Construct a matching regexp for TITLE, VOTES, and ANSWERS. Each element of TAGS is appended at the end of the expression -after being run through `sx-question--tag-format'." +after being run through `sx-tag--format'." `(rx line-start (+ whitespace) ,(number-to-string votes) (+ whitespace) ,(number-to-string answers) @@ -22,8 +22,7 @@ after being run through `sx-question--tag-format'." (+ (any whitespace digit)) (or "y" "d" "h" "m" "mo" "s") " ago" (+ whitespace) - (eval (mapconcat #'sx-question--tag-format - (list ,@tags) " ")))) + (eval (mapconcat #'sx-tag--format (list ,@tags) " ")))) ;;; Tests |