Commit c0b13f75d4b996c62382c072eef0bdd8dde7d85a

Thomas de Grivel 2015-09-18T04:40:50

Sudo.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
diff --git a/unix/commands.lisp b/unix/commands.lisp
index 7ae490f..c01925b 100644
--- a/unix/commands.lisp
+++ b/unix/commands.lisp
@@ -50,8 +50,8 @@
 (defun ls (options &rest files)
   (run (apply #'ls_ options files)))
 
-(defun sudo_ (options &rest command)
-  (join-str " " "sudo" options command))
+(defun sudo_ (&rest command)
+  (join-str " " "sudo" command))
 
-(defun sudo (options &rest command)
-  (run (apply #'sudo_ options command)))
+(defun sudo (&rest command)
+  (run (apply #'sudo_ command)))