Query all the :static-files of an ASDF system #37

(remove-if-not (lambda (x) (typep x 'asdf:static-file))
                        (asdf:component-children (asdf:find-system
    "alexandria")))
;; => (#<ASDF/COMPONENT:STATIC-FILE "cmdcollectivites" "README.markdown">)

(inspect (first *))

;; =>

The object is a STANDARD-OBJECT of type ASDF/COMPONENT:STATIC-FILE.
0. NAME: "README.markdown"
1. VERSION: NIL
2. DESCRIPTION: NIL
3. LONG-DESCRIPTION: NIL
4. SIDEWAY-DEPENDENCIES: NIL
5. IF-FEATURE: NIL
6. IN-ORDER-TO: NIL
7. INLINE-METHODS: NIL
8. RELATIVE-PATHNAME: NIL
9. ABSOLUTE-PATHNAME: #P"/home/vince/projets/ruche-web/commandes-collectivites/README.markdown"
10. OPERATION-TIMES: 
 (dict 'EQL  
 ) 
11. AROUND-COMPILE: "unbound"
12. PROPERTIES: NIL
13. %ENCODING: NIL
14. PARENT: #<ASDF/SYSTEM:SYSTEM "cmdcollectivites">
15. BUILD-OPERATION: NIL
16. ADDITIONAL-INPUT-FILES: NIL
17. TYPE: NIL
> q

(asdf:component-name (first **))

…
                 (:module "src/templates"
                        :components
                        ((:static-file "admin.html")
                         (:static-file "base.html")))
…
               (:static-file "README.md"))