File 从Racket中的目录列表中删除隐藏文件

在Racket中，我可以使用

目录列表

功能获取当前目录中所有文件的列表：

> (directory-list)
'(#<path:.git>
  #<path:.gitignore>
  #<path:README>)

---

有没有办法过滤

目录列表的结果以仅显示未隐藏的文件？
默认情况下
文件/glob
库忽略点文件。您可以使用关键字参数覆盖该行为

$ ls
README
$ racket
Welcome to Racket v7.6.0.9.
> (require file/glob)
> (glob "*")
'(#<path:/tmp/dir/README>)
> (glob "*" #:capture-dotfiles? #t)
'(#<path:/tmp/dir/.git> #<path:/tmp/dir/.gitignore> #<path:/tmp/dir/README>)

$ ls
README
$ racket
Welcome to Racket v7.6.0.9.
> (require file/glob)
> (glob "*")
'(#<path:/tmp/dir/README>)
> (glob "*" #:capture-dotfiles? #t)
'(#<path:/tmp/dir/.git> #<path:/tmp/dir/.gitignore> #<path:/tmp/dir/README>)

> (map (lambda (x) (find-relative-path (current-directory) x)) (glob "*"))
'(#<path:.git> #<path:.gitignore> #<path:README>)