From a332ea6dedc5e9d10a75d893211bd6a3e2f5636b Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Sun, 20 Aug 2023 14:41:26 +0300 Subject: emacs: update eshell aliases --- emacs.org | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) (limited to 'emacs.org') diff --git a/emacs.org b/emacs.org index 01d2e2d..9ade990 100755 --- a/emacs.org +++ b/emacs.org @@ -1045,13 +1045,21 @@ Create function to watch videos using ~mpv~ (gl . magit-log) (d . dired) (o . find-file) - (oo . find-file-other-window))) + (oo . find-file-other-window) + (ls . "ls -la"))) ;; Define aliases using `mapcar` (mapc (lambda (alias) - (defalias (car alias) (cdr alias))) + (let ((alias-name (if (symbolp (car alias)) + (symbol-name (car alias)) + (car alias))) + (alias-value (if (symbolp (cdr alias)) + (symbol-name (cdr alias)) + (cdr alias)))) + (eshell/alias alias-name alias-value))) thanos/eshell-aliases) + ;; PATH (defvar eshell-path-env (getenv "~/.local/bin")) #+end_src -- cgit v1.2.3