Remove text properties from to-do keyword in org-ql-view--format-element

[alphapapa]

This solves the weird problem in which to-do keywords may pick up extra, unexpected text properties from the buffer that might be added by indentation or formatting modes.

diff --git a/org-ql-view.el b/org-ql-view.el
index 02ebb3f..1448baa 100644
--- a/org-ql-view.el
+++ b/org-ql-view.el
@@ -878,7 +878,8 @@ (defun org-ql-view--format-element (element)
            (title (--> (org-ql-view--add-faces element)
                        (org-element-property :raw-value it)))
            (todo-keyword (-some--> (org-element-property :todo-keyword element)
-                           (org-ql-view--add-todo-face it)))
+                           (org-ql-view--add-todo-face
+                            (substring-no-properties it))))
            (tag-list (if org-use-tag-inheritance
                          ;; MAYBE: Use our own variable instead of `org-use-tag-inheritance'.
                          (if-let ((marker (or (org-element-property :org-hd-marker element)