[Seaside] cannot understand #canSort error using WATableReport

[LK]

I've created a PMLogsReport as a subclass of WATableReport and 
initialized it with:

initialize
    " logs returns a collection of PMLogItem objects from a GOODS database.
      The #columns are a list of the PMLogItem variables."

    super initialize.
    rows _ (self session logs).
    columns _ #(type entryDate startTime entryText endTime).

------------
When I attempt to use it, I get a MessageNotUnderstood error: on 
canSort.  How should I fix that.
-Larry


  MessageNotUnderstood: Symbol>>canSort

    * Symbol(Object)>>doesNotUnderstand: #canSort

          self 	#type
          aMessage 	a Message with selector: #canSort and arguments: #()

    * [] in PMLogsReport(WATableReport)>>renderHeaderForColumn:on:

          self 	a PMLogsReport
          aColumn 	#type
          html 	a WAHtmlRenderer

    * BlockContext>>renderOn:

          self 	[] in
          PMLogsReport(WATableReport)>>renderHeaderForColumn:on:
          aRenderer 	a WAHtmlRenderer

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>render:

          self 	a WAHtmlRenderer
          anObject 	[] in
          PMLogsReport(WATableReport)>>renderHeaderForColumn:on:

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>tag:do:

          self 	a WAHtmlRenderer
          aString 	'th'
          anObject 	[] in
          PMLogsReport(WATableReport)>>renderHeaderForColumn:on:

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>tableHeading:

          self 	a WAHtmlRenderer
          aBlock 	[] in
          PMLogsReport(WATableReport)>>renderHeaderForColumn:on:

    * PMLogsReport(WATableReport)>>renderHeaderForColumn:on:

          self 	a PMLogsReport
          aColumn 	#type
          html 	a WAHtmlRenderer

    * [] in PMLogsReport(WATableReport)>>renderTableHeaderOn:

          self 	a PMLogsReport
          html 	a WAHtmlRenderer
          ea 	#type

    * Array(SequenceableCollection)>>do:

          self 	#(#type #entryDate #startTime #entryText #endTime)
          aBlock 	[] in PMLogsReport(WATableReport)>>renderTableHeaderOn:
          index 	1
          indexLimiT 	5

    * [] in PMLogsReport(WATableReport)>>renderTableHeaderOn:

          self 	a PMLogsReport
          html 	a WAHtmlRenderer
          ea 	#type

    * BlockContext>>renderOn:

          self 	[] in PMLogsReport(WATableReport)>>renderTableHeaderOn:
          aRenderer 	a WAHtmlRenderer

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>render:

          self 	a WAHtmlRenderer
          anObject 	[] in PMLogsReport(WATableReport)>>renderTableHeaderOn:

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>tag:do:

          self 	a WAHtmlRenderer
          aString 	'tr'
          anObject 	[] in PMLogsReport(WATableReport)>>renderTableHeaderOn:

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>tableRow:

          self 	a WAHtmlRenderer
          aBlock 	[] in PMLogsReport(WATableReport)>>renderTableHeaderOn:

    * PMLogsReport(WATableReport)>>renderTableHeaderOn:

          self 	a PMLogsReport
          html 	a WAHtmlRenderer
          ea 	#type

    * [] in PMLogsReport(WATableReport)>>renderContentOn:

          self 	a PMLogsReport
          html 	a WAHtmlRenderer

    * BlockContext>>renderOn:

          self 	[] in PMLogsReport(WATableReport)>>renderContentOn:
          aRenderer 	a WAHtmlRenderer

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>render:

          self 	a WAHtmlRenderer
          anObject 	[] in PMLogsReport(WATableReport)>>renderContentOn:

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>tag:do:

          self 	a WAHtmlRenderer
          aString 	'table'
          anObject 	[] in PMLogsReport(WATableReport)>>renderContentOn:

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>table:

          self 	a WAHtmlRenderer
          aBlock 	[] in PMLogsReport(WATableReport)>>renderContentOn:

    * PMLogsReport(WATableReport)>>renderContentOn:

          self 	a PMLogsReport
          html 	a WAHtmlRenderer

    * PMLogsReport(WAPresenter)>>renderWithContext:

          self 	a PMLogsReport
          aRenderingContext 	a WARenderingContext
          html 	a WAHtmlRenderer
          callbacks 	a WACallbackRegistry

    * [] in PMLogsReport(WAComponent)>>renderOn:

          self 	a PMLogsReport
          aRenderer 	a WAHtmlRenderer
          ea 	a PMLogsReport

    * PMLogsReport(WAComponent)>>decorationChainDo:

          self 	a PMLogsReport
          aBlock 	[] in PMLogsReport(WAComponent)>>renderOn:

    * PMLogsReport(WAComponent)>>renderOn:

          self 	a PMLogsReport
          aRenderer 	a WAHtmlRenderer
          ea 	a PMLogsReport

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>render:

          self 	a WAHtmlRenderer
          anObject 	a PMLogsReport

    * PMLogsTask>>renderContentOn:

          self 	a PMLogsTask
          html 	a WAHtmlRenderer

    * PMLogsTask(WAPresenter)>>renderWithContext:

          self 	a PMLogsTask
          aRenderingContext 	a WARenderingContext
          html 	a WAHtmlRenderer
          callbacks 	a WACallbackRegistry

    * [] in PMLogsTask(WAComponent)>>renderOn:

          self 	a PMLogsTask
          aRenderer 	a WAHtmlRenderer
          ea 	a PMLogsTask

    * PMLogsTask(WAComponent)>>decorationChainDo:

          self 	a PMLogsTask
          aBlock 	[] in PMLogsTask(WAComponent)>>renderOn:

    * PMLogsTask(WAComponent)>>renderOn:

          self 	a PMLogsTask
          aRenderer 	a WAHtmlRenderer
          ea 	a PMLogsTask

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>render:

          self 	a WAHtmlRenderer
          anObject 	a PMLogsTask

    * WAToolFrame>>renderChildOn:

          self 	a WAToolFrame
          html 	a WAHtmlRenderer

    * [] in WAToolFrame>>renderContentOn:

          self 	a WAToolFrame
          html 	a WAHtmlRenderer

    * BlockContext>>renderOn:

          self 	[] in WAToolFrame>>renderContentOn:
          aRenderer 	a WAHtmlRenderer

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>render:

          self 	a WAHtmlRenderer
          anObject 	[] in WAToolFrame>>renderContentOn:

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>tag:do:

          self 	a WAHtmlRenderer
          aString 	'div'
          anObject 	[] in WAToolFrame>>renderContentOn:

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>div:

          self 	a WAHtmlRenderer
          aBlock 	[] in WAToolFrame>>renderContentOn:

    * WAHtmlRenderer(WAAbstractHtmlBuilder)>>divNamed:with:

          self 	a WAHtmlRenderer
          aString 	'frameContent'
          anObject 	[] in WAToolFrame>>renderContentOn:

    * WAToolFrame>>renderContentOn:

          self 	a WAToolFrame
          html 	a WAHtmlRenderer

    * WAToolFrame(WAPresenter)>>renderWithContext:

          self 	a WAToolFrame
          aRenderingContext 	a WARenderingContext
          html 	a WAHtmlRenderer
          callbacks 	a WACallbackRegistry

    * [] in WARenderLoop>>render

          self 	a WARenderLoop
          request 	nil
          context 	a WARenderingContext
          document 	a WAHtmlStreamDocument
          docRoot 	a WARenderedHtmlRoot
          url 	a WAUrl
          response 	a WAResponse
          ea 	a WAToolFrame

    * WAToolFrame(WAComponent)>>decorationChainDo:

          self 	a WAToolFrame
          aBlock 	[] in WARenderLoop>>render

    * [] in WARenderLoop>>render

          self 	a WARenderLoop
          request 	nil
          context 	a WARenderingContext
          document 	a WAHtmlStreamDocument
          docRoot 	a WARenderedHtmlRoot
          url 	a WAUrl
          response 	a WAResponse
          ea 	a WAToolFrame

    * [] in PMSession(WASession)>>respond:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          responseBlock 	[] in WARenderLoop>>render
          request 	nil
          snapshotHolder 	a ValueHolder
          response 	nil
          oldEscape 	a Continuation
          v 	nil
          cc 	a Continuation
          url 	a WAUrl

    * Continuation class>>currentDo:

          self 	Continuation
          aBlock 	[] in PMSession(WASession)>>respond:

    * PMSession(WASession)>>respond:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          responseBlock 	[] in WARenderLoop>>render
          request 	nil
          snapshotHolder 	a ValueHolder
          response 	nil
          oldEscape 	a Continuation
          v 	nil
          cc 	a Continuation
          url 	a WAUrl

    * WARenderLoop>>render

          self 	a WARenderLoop
          request 	nil
          context 	a WARenderingContext
          document 	a WAHtmlStreamDocument
          docRoot 	a WARenderedHtmlRoot
          url 	a WAUrl
          response 	a WAResponse
          ea 	a WAToolFrame

    * [] in WARenderLoop>>run

          self 	a WARenderLoop
          notification 	nil

    * BlockContext>>on:do:

          self 	[] in WARenderLoop>>run
          exception 	WARenderNotification
          handlerAction 	[] in WARenderLoop>>withRenderNowHandler:
          handlerActive 	true

    * WARenderLoop>>withRenderNowHandler:

          self 	a WARenderLoop
          aBlock 	[] in WARenderLoop>>run
          n 	nil

    * [] in WARenderLoop>>run

          self 	a WARenderLoop
          notification 	nil

    * BlockContext>>on:do:

          self 	[] in WARenderLoop>>run
          exception 	WAPageExpired
          handlerAction 	[] in WARenderLoop>>withPageExpiredHandler:
          handlerActive 	true

    * WARenderLoop>>withPageExpiredHandler:

          self 	a WARenderLoop
          aBlock 	[] in WARenderLoop>>run
          n 	nil

    * [] in WARenderLoop>>run

          self 	a WARenderLoop
          notification 	nil

    * BlockContext>>repeat

          self 	[] in WARenderLoop>>run

    * WARenderLoop>>run

          self 	a WARenderLoop
          notification 	nil

    * WARenderLoopMain>>start:

          self 	a WARenderLoopMain
          aRequest 	a WARequest

    * PMSession(WASession)>>start:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aRequest 	a WARequest

    * [] in PMSession(WASession)>>performRequest:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aRequest 	a WARequest
          key 	nil
          continuation 	nil

    * Dictionary>>at:ifAbsent:

          self 	a Dictionary()
          key 	'_k'
          aBlock 	[] in PMSession(WASession)>>performRequest:
          assoc 	nil

    * PMSession(WASession)>>performRequest:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aRequest 	a WARequest
          key 	nil
          continuation 	nil

    * [] in PMSession(WASession)>>responseForRequest:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aRequest 	a WARequest

    * BlockContext>>on:do:

          self 	[] in PMSession(WASession)>>responseForRequest:
          exception 	Error
          handlerAction 	[] in PMSession(WASession)>>withErrorHandler:
          handlerActive 	false

    * [] in PMSession(WASession)>>withErrorHandler:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aBlock 	[] in PMSession(WASession)>>responseForRequest:
          e 	MessageNotUnderstood: Symbol>>canSort
          w 	nil

    * BlockContext>>on:do:

          self 	[] in PMSession(WASession)>>withErrorHandler:
          exception 	Warning
          handlerAction 	[] in PMSession(WASession)>>withErrorHandler:
          handlerActive 	true

    * PMSession(WASession)>>withErrorHandler:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aBlock 	[] in PMSession(WASession)>>responseForRequest:
          e 	MessageNotUnderstood: Symbol>>canSort
          w 	nil

    * [] in PMSession(WASession)>>responseForRequest:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aRequest 	a WARequest

    * BlockContext>>on:do:

          self 	[] in PMSession(WASession)>>responseForRequest:
          exception 	WACurrentSession
          handlerAction 	[] in WACurrentSession class(WADynamicVariable
          class)>>use:during:
          handlerActive 	true

    * WACurrentSession class(WADynamicVariable class)>>use:during:

          self 	WACurrentSession
          anObject 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aBlock 	[] in PMSession(WASession)>>responseForRequest:
          n 	WACurrentSession

    * [] in PMSession(WASession)>>responseForRequest:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aRequest 	a WARequest

    * [] in PMSession(WASession)>>withEscapeContinuation:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aBlock 	[] in PMSession(WASession)>>responseForRequest:
          cc 	a Continuation

    * Continuation class>>currentDo:

          self 	Continuation
          aBlock 	[] in PMSession(WASession)>>withEscapeContinuation:

    * PMSession(WASession)>>withEscapeContinuation:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aBlock 	[] in PMSession(WASession)>>responseForRequest:
          cc 	a Continuation

    * [] in PMSession>>withEscapeContinuation:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aBlock 	[] in PMSession(WASession)>>responseForRequest:

    * KKDatabase>>commitWithRetry:

          self 	a KKDatabase
          aBlock 	[] in PMSession>>withEscapeContinuation:
          val 	nil

    * PMSession>>withEscapeContinuation:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aBlock 	[] in PMSession(WASession)>>responseForRequest:

    * PMSession(WASession)>>responseForRequest:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aRequest 	a WARequest

    * [] in PMSession(WASession)>>incomingRequest:

          self 	a PMSession(/seaside/logs?_s=wTDlOyTfmKYSjCsi)
          aRequest 	a WARequest
          e 	nil

    * BlockContext>>on:do:

          self 	[] in PMSession(WASession)>>incomingRequest:
          exception 	Error
          handlerAction 	[] in PMSession(WASession)>>incomingRequest:
          handlerActive 	true

    * [] in WAProcessMonitor>>critical:ifError:

          self 	a WAProcessMonitor
          aBlock 	[] in PMSession(WASession)>>incomingRequest:
          errorBlock 	[] in PMSession(WASession)>>incomingRequest:
          value 	nil

    * BlockContext>>ensure:

          self 	[] in WAProcessMonitor>>critical:ifError:
          aBlock 	[] in WAProcessMonitor>>critical:ifError:
          returnValue 	nil

    * [] in WAProcessMonitor>>critical:ifError:

          self 	a WAProcessMonitor
          aBlock 	[] in PMSession(WASession)>>incomingRequest:
          errorBlock 	[] in PMSession(WASession)>>incomingRequest:
          value 	nil

    * [] in BlockContext>>newProcess

          self 	[] in WAProcessMonitor>>critical:ifError: