diff --git a/scheme/std-command.scm b/scheme/std-command.scm index d3eaa8b..f4dcd50 100644 --- a/scheme/std-command.scm +++ b/scheme/std-command.scm @@ -127,8 +127,8 @@ ;; We don't care for options that format the output. (define defaults-ls-options - '((long . #t) - (dot-files? . #t) + '((long . #f) + (dot-files? . #f) (sort-by-mtime . #f) (reverse-sort . #f))) @@ -170,7 +170,7 @@ no-completer (lambda (command args) (debug-message "running ls plugin" command args) - (receive (options paths) (parse-ls-arguments args) + (receive (options paths) (parse-ls-arguments args) ;; 'long is ignored (let* ((set? (lambda (opt) (cdr (assoc opt options)))) (sort (if (set? 'sort-by-mtime)