diff options
| -rw-r--r-- | pkgs/development/lisp-modules/quicklisp-to-nix/ql-to-nix.lisp | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/pkgs/development/lisp-modules/quicklisp-to-nix/ql-to-nix.lisp b/pkgs/development/lisp-modules/quicklisp-to-nix/ql-to-nix.lisp index 3824a04826f17..4a82b6cafa6fe 100644 --- a/pkgs/development/lisp-modules/quicklisp-to-nix/ql-to-nix.lisp +++ b/pkgs/development/lisp-modules/quicklisp-to-nix/ql-to-nix.lisp @@ -44,7 +44,7 @@ (wrap :ql-dist short-description) (defun escape-filename (s) - (format + (format nil "~a~{~a~}" (if (scan "^[a-zA-Z_]" s) "" "_") (loop @@ -260,9 +260,10 @@ This function stores results for memoization purposes in files within (defun print-usage-and-quit () "Does what it says on the tin." (format *error-output* "Usage: - ~A [--help] [--cacheSystemInfoDir <path>] <work-dir> + ~A [--help] [--cacheSystemInfoDir <path>] [--cacheFaslDir <path>] <work-dir> Arguments: --cacheSystemInfoDir Store computed system info in the given directory + --cacheFaslDir Store intermediate fast load files in the given directory --help Print usage and exit <work-dir> Path to directory with quicklisp-to-nix-systems.txt " (uiop:argv0)) |