From d28e259e0b5b736a0eb43e37410de5134e602589 Mon Sep 17 00:00:00 2001
From: JSDurand <mmemmew@gmail.com>
Date: Sun, 28 Feb 2021 14:29:34 +0800
Subject: (search-conf.el) fix the function to replace symbol at point

* search-conf.el (durand-search-replace-symbol): Now this will also
  account for the symbol at point, while previously that will be
  skipped.
---
 search-conf.el | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'search-conf.el')

diff --git a/search-conf.el b/search-conf.el
index bb8297b..9868bad 100644
--- a/search-conf.el
+++ b/search-conf.el
@@ -12,6 +12,8 @@
 If ARG is negative, replace backwards."
   (interactive "p")
   (isearch-forward-symbol-at-point arg)
+  (isearch-repeat-backward 1)
+  (isearch-exit)
   (isearch-query-replace-regexp (cond ((< arg 0) arg))))
 
 (define-key global-map (vector ?\M-s ?%) #'durand-search-replace-symbol)
-- 
cgit v1.2.3-18-g5258