better filtering of user docs (?)
svn: r11056
This commit is contained in:
parent
74dd0655e5
commit
1d00d880ec
|
@ -30,7 +30,8 @@
|
|||
|
||||
(define (user-doc? doc)
|
||||
(or (memq 'user-doc-root (doc-flags doc))
|
||||
(memq 'user-doc (doc-flags doc))))
|
||||
(memq 'user-doc (doc-flags doc))
|
||||
(not (doc-under-main? doc))))
|
||||
|
||||
(define (filter-user-docs docs make-user?)
|
||||
(cond ;; Specifically disabled user stuff, filter
|
||||
|
|
Loading…
Reference in New Issue
Block a user