master c4d16909fa4 2/2: ; Be more strict with command arguments for a few Eshell commands

[Jim Porter]

branch: master
commit c4d16909fa4c30fd5f11bd66de7936790349cb7d
Author: Jim Porter <jporterbugs@gmail.com>
Commit: Jim Porter <jporterbugs@gmail.com>

    ; Be more strict with command arguments for a few Eshell commands
    
    * lisp/eshell/em-dirs.el (eshell/pwd):
    * lisp/eshell/em-unix.el (eshell/whoami):
    * lisp/eshell/esh-proc.el (eshell/jobs): Don't accept arguments.
---
 lisp/eshell/em-dirs.el  | 2 +-
 lisp/eshell/em-unix.el  | 2 +-
 lisp/eshell/esh-proc.el | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/eshell/em-dirs.el b/lisp/eshell/em-dirs.el
index cf90a8bb230..85036620c57 100644
--- a/lisp/eshell/em-dirs.el
+++ b/lisp/eshell/em-dirs.el
@@ -316,7 +316,7 @@ Thus, this does not include the current directory.")
                    (`(boundaries . ,suffix)
                     `(boundaries 0 . ,(string-search "/" suffix))))))))))
 
-(defun eshell/pwd (&rest _args)
+(defun eshell/pwd ()
   "Change output from `pwd' to be cleaner."
   (let* ((path default-directory)
         (len (length path)))
diff --git a/lisp/eshell/em-unix.el b/lisp/eshell/em-unix.el
index dad02206759..c3c3fea691a 100644
--- a/lisp/eshell/em-unix.el
+++ b/lisp/eshell/em-unix.el
@@ -1018,7 +1018,7 @@ Show wall-clock time elapsed during execution of 
COMMAND.")
                                  (eshell-stringify-list
                                   (flatten-tree (cdr time-args))))))))
 
-(defun eshell/whoami (&rest _args)
+(defun eshell/whoami ()
   "Make \"whoami\" Tramp aware."
   (eshell-user-login-name))
 
diff --git a/lisp/eshell/esh-proc.el b/lisp/eshell/esh-proc.el
index 2bb0043bddb..35c81f6a4b2 100644
--- a/lisp/eshell/esh-proc.el
+++ b/lisp/eshell/esh-proc.el
@@ -193,7 +193,7 @@ This is like `process-live-p', but additionally checks 
whether
 
 (defalias 'eshell/wait #'eshell-wait-for-process)
 
-(defun eshell/jobs (&rest _args)
+(defun eshell/jobs ()
   "List processes, if there are any."
   (and (fboundp 'process-list)
        (process-list)