summaryrefslogtreecommitdiff
path: root/.config
diff options
context:
space:
mode:
Diffstat (limited to '.config')
-rw-r--r--.config/emacs/init.el5
-rw-r--r--.config/emacs/modules/mm-search.el20
2 files changed, 25 insertions, 0 deletions
diff --git a/.config/emacs/init.el b/.config/emacs/init.el
index bc29838..6c72ae0 100644
--- a/.config/emacs/init.el
+++ b/.config/emacs/init.el
@@ -84,6 +84,10 @@ This function is meant to be used in conjuction with `read-string' and
(declare (indent 0))
nil)
+(defun mm-nil (&rest _)
+ "Return nil."
+ nil)
+
(defmacro mm-with-suppressed-output (&rest body)
"Execute BODY while suppressing output.
Execute BODY as given with all output to the echo area or the *Messages*
@@ -328,6 +332,7 @@ the buffer without saving it."
(require 'mm-modeline) ; Modeline
(require 'mm-org) ; Org-Mode
(require 'mm-projects) ; Project Management
+(require 'mm-search) ; Text Searching
(require 'mm-spellcheck) ; Spell Checking
(require 'mm-tetris) ; Emacs Tetris
(require 'mm-theme) ; Themeing
diff --git a/.config/emacs/modules/mm-search.el b/.config/emacs/modules/mm-search.el
new file mode 100644
index 0000000..9de1eed
--- /dev/null
+++ b/.config/emacs/modules/mm-search.el
@@ -0,0 +1,20 @@
+;;; mm-search.el --- Emacs text searching -*- lexical-binding: t; -*-
+
+;;; Classic Emacs text search
+
+(use-package isearch
+ :demand t
+ :bind ( :map isearch-mode-map
+ ("M-/" . isearch-complete)
+ :map minibuffer-local-isearch-map
+ ("M-/" . isearch-complete-edit))
+ :custom
+ (search-whitespace-regexp ".*?")
+ (isearch-lax-whitespace t)
+ (isearch-regexp-lax-whitespace nil)
+ (isearch-lazy-count t)
+ (lazy-highlight-initial-delay 0)
+ (lazy-count-prefix-format "(%s/%s) ")
+ (isearch-repeat-on-direction-change t))
+
+(provide 'mm-search) \ No newline at end of file