From 40240bbfd7d508570856fdaa43274baa31a30e53 Mon Sep 17 00:00:00 2001 From: Aryadev Chavali Date: Sat, 11 May 2024 13:04:45 +0530 Subject: (Emacs/app)~changed project-root function and added aliases project-root now uses project.el. aliases for goto and project-root. --- Emacs/.config/emacs/.config/eshell/aliases | 6 ++++-- Emacs/.config/emacs/app.org | 12 ++++++------ 2 files changed, 10 insertions(+), 8 deletions(-) (limited to 'Emacs') diff --git a/Emacs/.config/emacs/.config/eshell/aliases b/Emacs/.config/emacs/.config/eshell/aliases index 17fa780..17b23f2 100644 --- a/Emacs/.config/emacs/.config/eshell/aliases +++ b/Emacs/.config/emacs/.config/eshell/aliases @@ -1,3 +1,5 @@ -alias ff find-file-other-window $1 +alias p~ project-root +alias gt goto +alias clear clear-scrollback alias d dired $1 -alias clear clear-scrollback \ No newline at end of file +alias ff find-file-other-window $1 diff --git a/Emacs/.config/emacs/app.org b/Emacs/.config/emacs/app.org index d4ac94d..6448ea5 100644 --- a/Emacs/.config/emacs/app.org +++ b/Emacs/.config/emacs/app.org @@ -547,12 +547,12 @@ directory. "Use `read-directory-name' to change directories." (eshell/cd (list (read-directory-name "Directory?: ")))) - (with-eval-after-load "projectile" - (defun eshell/goto-project-root (&rest args) - "Change to directory `projectile-project-root'" - (if (projectile-project-root) - (eshell/cd (list (projectile-project-root))) - (eshell/echo "Projectile not active here...")))) + (defun eshell/project-root (&rest args) + "Change to directory `project-root'" + (if (project-current) + (eshell/cd (list (project-root (project-current)))) + (eshell/echo (format "[%s]: No project in current directory" + (propertize "Error" 'font-lock-face '(:foreground "red")))))) (defun +eshell/current-buffer () (interactive) -- cgit v1.2.3-13-gbd6f