From c46dd1cde6d8428a73be0f2e6918b701af541004 Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Wed, 7 Jan 2015 15:46:13 -0200 Subject: Fix sx-format-replacements replace-match moves point --- sx.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'sx.el') 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)))) -- cgit v1.2.3