Fix sx-format-replacements

replace-match moves point

1 files changed, 2 insertions, 1 deletions

diff --git a/sx.el b/sx.el
index f01a11d..4159933 100644
--- a/sx.el
+++ b/sx.el
@@ -369,7 +369,8 @@ if ALIST contains a different string at the ?% entry."
              (format (concat "%" flag "s") val)
              (cdr-safe (assq char property-alist))))
           ;; Delete the specifier body.
-          (replace-match "")
+          (delete-region (match-beginning 0)
+                         (match-end 0))
           ;; Delete `char-after'.
           (delete-char 1)))
       (buffer-string))))