         (setq files (cdr files))
         (cond
          ((eq spec :defaults)
-          (setq files (append straight--default-files-directive files)))
+          (setq files (append straight-default-files-directive files)))
          ;; Replace string-only specs with a bunch of conses that have
          ;; already been wildcard-expanded.
          ((stringp spec)

  ;; repeatedly in the recursive section.
  (let* ((default-directory src-dir)
         (result (straight--expand-files-directive-internal
                  (or files straight--default-files-directive)
                  src-dir ""))
         ;; We can safely discard the exclusions in the cdr of
         ;; `result', since any mappings that should have been

;;;; Building packages
;;;;; Files directive processing

(defvar straight-default-files-directive
  '("*.el" "*.el.in" "dir"
    "*.info" "*.texi" "*.texinfo"
    "doc/dir" "doc/*.info" "doc/*.texi" "doc/*.texinfo"
    (:exclude ".dir-locals.el" "test.el" "tests.el" "*-test.el" "*-tests.el"))
  "Default value for the `:files' directive in recipes.
It is also spliced in at any point where the `:default' keyword
is used in a `:files' directive.")

(defun straight--expand-files-directive-internal (files src-dir prefix)
  "Expand FILES directive in SRC-DIR with path PREFIX.
