Hi,
I have a question about PRReportView.
In Pier-Seaside-lr.125, PRReportView reveals all contents for any user.
PRReportView>>buildStructures
^ self context enumerator all contents
I think that the pages which are prohibited for the user should not be
reported. So that, the code will be modifyed like this.
PRReportView>>buildStructures
^ Array
streamContents: [:stream | self context structure enumerator all
do: [:each | (each isValidCommand: self context command class in: self context)
ifTrue: [stream nextPut: each]]]
-- !
Koji Yokokawa <koubo2006(a)yengawa.jpn.org>
http://yengawa.com/
^self new!