diff --git a/lisp/init-better-default.el b/lisp/init-better-default.el
index 465347c..aa1f99a 100644
--- a/lisp/init-better-default.el
+++ b/lisp/init-better-default.el
@@ -56,8 +56,8 @@
 (setq frame-title-format "Emacs: %b")
 (setq custom-safe-themes t)
 
-(setq insert-directory-program "gls")
-
+(pcase system-type ('darwin (setq insert-directory-program "gls")))
+    
 (setq-default tab-width 4
 	          compilation-scroll-output t
 	          indent-tabs-mode nil)
diff --git a/lisp/init-completion.el b/lisp/init-completion.el
index 2a49be2..2e199fd 100644
--- a/lisp/init-completion.el
+++ b/lisp/init-completion.el
@@ -128,7 +128,7 @@
 	 ("s-f" . consult-line)
 	 ("C-c s s" . consult-line)
 	 ("C-c p f" . consult-projectile)
-	 ("C-c f r" . consult-recent-file)
+	 ("C-x C-r" . consult-recent-file)
 	 ("C-x C-b" . consult-buffer)
 	 ("C-c s p" . consult-ripgrep))
   :hook (completion-list-mode . consult-preview-at-point-mode)