Use consistent tag formatting

Puts `mapconcat' to work by defining a helper function
`sx-question--tag-format' and `concat'ing them with ` '.  Simpler, more
maintainable construction.

1 files changed, 4 insertions, 0 deletions

diff --git a/sx-question.el b/sx-question.el
index d3fd79f..0142929 100644
--- a/sx-question.el
+++ b/sx-question.el
@@ -73,6 +73,10 @@ With optional argument predicate, use it instead of `<'."
            (cdr (assoc property x))
            (cdr (assoc property y))))
 
+(defun sx-question--tag-format (tag)
+  "Formats TAG for display"
+  (concat "[" tag "]"))
+
 (provide 'sx-question)
 ;;; sx-question.el ends here