From ebb1acb76a9dfd808716f321c72d03ee497c9618 Mon Sep 17 00:00:00 2001
From: Flinner <flinner.hlqn@aleeas.com>
Date: Fri, 18 Mar 2022 23:00:16 +0300
Subject: [PATCH] feat: emacs insert relative file path

---
 emacs.mine/.config/emacs.mine/emacs.org | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/emacs.mine/.config/emacs.mine/emacs.org b/emacs.mine/.config/emacs.mine/emacs.org
index 67d218a..bd362d6 100644
--- a/emacs.mine/.config/emacs.mine/emacs.org
+++ b/emacs.mine/.config/emacs.mine/emacs.org
@@ -302,6 +302,17 @@ Edit: honestly I have no clue wtf that meant, or why I wrote it, but I will keep
   (defun my/keybind/capture-inbox ()
     (interactive)
     (org-capture  nil "gi"))
+  
+  (defun my/counsel-insert-file-path ()
+    "Insert relative file path using counsel minibuffer"
+    (interactive)
+    (unless (featurep 'counsel) (require 'counsel))
+    (ivy-read "Insert filename: " 'read-file-name-internal
+                :matcher #'counsel--find-file-matcher
+                :action
+                (lambda (x)
+                (insert (file-relative-name x)))))
+
 #+end_src
 
 ***  leader-keys
@@ -429,6 +440,7 @@ Capture
 #+begin_src emacs-lisp
   "i"  '(:ignore t :which-key "Insert")
   "ie" '(emoji-insert :which-key "Emoji")
+  "if" '(my/counsel-insert-file-path :which-key "Insert Relative path")
 #+end_src
 
 **** Buffers (b)