[Emacs] Remove some Eshell-specific functions

This commit is contained in:
Lucien Cartier-Tilet 2020-10-25 11:25:13 +01:00
parent 24beba2616
commit 86de78bedb
Signed by: phundrak
GPG Key ID: BD7789E705CB8DCA

View File

@ -1815,19 +1815,6 @@
(defalias 'list-buffers 'ibuffer) (defalias 'list-buffers 'ibuffer)
#+END_SRC #+END_SRC
#+BEGIN_SRC emacs-lisp
(defun eshell/mkdir ($directory)
(make-directory $directory t))
#+END_SRC
#+BEGIN_SRC emacs-lisp
(defun eshell/ls (&optional $directory)
(shell-command (format "exa -halg@ --group-directories-first --git%s"
(if (string= "" $directory)
""
(concat " " $directory)))))
#+END_SRC
***** System monitoring ***** System monitoring
:PROPERTIES: :PROPERTIES:
:CUSTOM_ID: User_Configuration-Eshell-Aliases-System_monitoring-ee01b070 :CUSTOM_ID: User_Configuration-Eshell-Aliases-System_monitoring-ee01b070
@ -1886,20 +1873,6 @@
$args)) $args))
#+END_SRC #+END_SRC
But if I just want to run ~pacman~ as sudo, then I could always just type
~p~.
#+BEGIN_SRC emacs-lisp
(defun eshell/p (&rest $args)
(phundrak/concatenate-shell-command "sudo pacman" $args))
#+END_SRC
Sometimes, I just want to purge my package managers cache, be it
~pacman~'s or ~yay~'s. This is why I simply type ~purge~.
#+BEGIN_SRC emacs-lisp
(defun eshell/purge ()
(shell-command "yay -Sc"))
#+END_SRC
***** Other ***** Other
:PROPERTIES: :PROPERTIES:
:CUSTOM_ID: User_Configuration-Eshell-Aliases-Other-bd88ca97 :CUSTOM_ID: User_Configuration-Eshell-Aliases-Other-bd88ca97
@ -1912,21 +1885,6 @@
(cd $directory)) (cd $directory))
#+end_src #+end_src
#+BEGIN_SRC emacs-lisp
(defun eshell/lsl (&rest $args)
(eshell/ls "-aHl" $args))
#+END_SRC
#+BEGIN_SRC emacs-lisp
(defun eshell/ll (&rest $args)
(eshell/ls "-ahl" $args))
#+END_SRC
#+BEGIN_SRC emacs-lisp
(defun eshell/la (&rest $args)
(eshell/ls "-A" $args))
#+END_SRC
***** Typos ***** Typos
:PROPERTIES: :PROPERTIES:
:CUSTOM_ID: User_Configuration-Eshell-Aliases-Typos-c7bfe6eb :CUSTOM_ID: User_Configuration-Eshell-Aliases-Typos-c7bfe6eb