                      indent-left indent-right indent-first-line mirror-indents?)
              (ppr options))
            (when (or font font-size font-color bold? italics? underline?)
-             (rpr options))
+             (run-properties options))
            ;; Style Table Properties
            (node :w:tblPr {}
                  ;; Number of Rows in Row Band

                     indent-left indent-right indent-first-line mirror-indents?)
             (ppr options))
           (when (or font font-size font-color bold? italics? underline?)
             (rpr options)))
           (when font
             (character-style character-style-name options))]))


                                    :w:header 0
                                    :w:footer 0})))))

(defn- run-properties
  "Creates w:rPr tag node. Called by paragaph-style."
  [{:as options
    :keys [font font-size font-color bold? italics? underline? strike?]}]
