   (defun meain/project-name ()
     (file-name-nondirectory (directory-file-name (car (project-roots (project-current))))))
   :init
-  (evil-leader/set-key "p"
+  (evil-leader/set-key "p p"
     (meain/with-alternate (call-interactively 'project-switch-project)
                           (project-find-file)))
   (define-key evil-normal-state-map (kbd "<RET>") 'project-find-file))

  :commands (redacted-mode)
  :config (add-hook 'redacted-mode-hook (lambda () (read-only-mode (if redacted-mode 1 -1)))))

;;; [CUSTOM FUNCTIONS] ==============================================

;; Font size changes

  :straight t
  :commands rg
  :init
  (evil-leader/set-key "p f"
    (meain/with-alternate (let ((selectrum-display-style '(vertical)))
                            (consult-ripgrep))
                          (call-interactively 'rg)))
