From 53db9402916822e673b3b49fcba26537e2416b59 Mon Sep 17 00:00:00 2001
From: JSDurand <mmemmew@gmail.com>
Date: Wed, 20 Jan 2021 11:08:00 +0800
Subject: More QoL changes

* basic.el (auto-fill-function): Hide auto-fill-function from the mode line.
(auto-revert-mode): Hide auto-revert-mode from the mode line.
* common.el (durand-hide-minor-mode): Use a simple macro to facilitate
  hiding.
* elisp.el (eldoc-mode): Use a macro to hide instead.

* eww-conf.el (eww-bookmarks-directory): Start Configuring EWW.

* init.el ("durand-simple"): My simple utilities.
("search-conf.el"): Configuring searching.

* search-conf.el (search-whitespace-regexp): White space as wild cards
(isearch-lax-whitespace): as above
(isearch-lazy-count): Count the matches
(isearch-allow-scroll): Scrolling while searching
(durand-search-replace-symbol): For quick refactoring

* text-conf.el (assq): Hide using the macro instead.
---
 search-conf.el | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 search-conf.el

(limited to 'search-conf.el')

diff --git a/search-conf.el b/search-conf.el
new file mode 100644
index 0000000..bb8297b
--- /dev/null
+++ b/search-conf.el
@@ -0,0 +1,25 @@
+;;; search-conf.el --- My configurations for searching -*- lexical-binding: t; -*-
+
+(setq search-whitespace-regexp ".*?")
+(setq isearch-lax-whitespace t)
+(setq isearch-lazy-count t)
+(setq isearch-allow-scroll 'unlimited)
+
+;;;###autoload
+(defun durand-search-replace-symbol (&optional arg)
+  "Search the symbol at point and query-replace.
+
+If ARG is negative, replace backwards."
+  (interactive "p")
+  (isearch-forward-symbol-at-point arg)
+  (isearch-query-replace-regexp (cond ((< arg 0) arg))))
+
+(define-key global-map (vector ?\M-s ?%) #'durand-search-replace-symbol)
+
+
+
+
+
+(provide 'search-conf)
+
+;;; search-conf.el ends here
-- 
cgit v1.2.3-18-g5258