From 619bfcb18f9e422bd0a0f0489cbfce22c0ff83f8 Mon Sep 17 00:00:00 2001
From: 10sr <8.slashes@gmail.com>
Date: Thu, 29 May 2025 15:46:18 +0900
Subject: [PATCH] Update

---
 emacs.el | 13 +++++++++++--
 shrc     |  1 +
 2 files changed, 12 insertions(+), 2 deletions(-)

diff --git a/emacs.el b/emacs.el
index 1b3f509..660aed6 100644
--- a/emacs.el
+++ b/emacs.el
@@ -2690,13 +2690,13 @@ condition to choose COMMAND when evaluated.")
        ;; ripgrep
        ("rg"
         (executable-find "rg")
-        "rg -nH --no-heading --hidden --no-ignore-parent --glob '!.git/' --smart-case -M 1280 ")
+        "rg -nH --no-heading --color=never --hidden --no-ignore-parent --glob '!.git/' --smart-case -M 1280 ")
 
        ;; git grep
        ("gitgrep"
         (eq 0
             (shell-command "git rev-parse --git-dir"))
-        "git --no-pager grep -nH -e ")
+        "git --no-pager grep -nH --color=never --ignore-case -e ")
 
        ;; sift
        ("sift"
@@ -3116,6 +3116,15 @@ BEGIN {
 }
 ")
 
+(defun my-git-info-exclude ()
+  "Open .git/info/exlucde file."
+  (interactive)
+  (if-let* ((dir (locate-dominating-file default-directory
+                                     ".git/info/exclude")))
+      (find-file (expand-file-name ".git/info/exclude"
+                                 dir))
+    (error "No .git/info/exclude file found")))
+
 '(progn
    ;; https://web.sfc.wide.ad.jp/~sagawa/gnujdoc/elisp-manual-20-2.5/elisp-ja_39.html#SEC629
    ;; https://emacs.stackexchange.com/questions/15078/inserting-before-an-after-string-overlay
diff --git a/shrc b/shrc
index 6a11f12..c9d0b99 100755
--- a/shrc
+++ b/shrc
@@ -351,6 +351,7 @@ __safe_alias pipenv="env -u PIP_USER pipenv"
 __safe_alias pipx="env -u PIP_USER pipx"
 
 alias f='less `fzf`'
+alias fcd='cd `find . -type d 2>/dev/null | fzf`'
 
 
 # Sometimes SHELL cannot be used. For example, when running bash inside zsh