smalltalk - 如何配置 Seaside 3.2 session 超时(年龄)

Question

使用 Seaside 应用程序启动我的图像时，我在启动方法中有此代码:

WAMySeasideApp>>startUp: resuming 
        WAMySeasideApp waApplication
                preferenceAt: #maximumRelativeAge
                put: 18000. "5 hours"
        WAEFTTasksApp waApplication
                preferenceAt: #maximumAbsoluteAge
                put: 86400. "24 hours"
        ZnZincServerAdaptor startOn: 8080.

WAMySeasideApp>>waApplication
        ^ WAAdmin defaultDispatcher handlerAt: 'my-seaside-app'

这个“最大年龄” session 参数正确显示在海边配置网络应用程序中，但每个海边 session 仍然是 30 分钟。

通过代码动态配置 session 超时(年龄)的正确方法是什么？对于 Seaside 3.2，请。

Answer 1

这是否有帮助:

anApplication cache expiryPolicy configuration 
at: #cacheTimeout put: 1200

(来自 http://book.seaside.st , 18.5 捕获 session 到期通知)