test6:aRequest "send a file - requires a test6.html file to be found under the htmldialogs directory." "/aRequest nextPutLine:('htmldialogs/test6.html' asFilename contents asString) |replyPresenter| replyPresenter := aRequest replyPresenter. replyPresenter title:'Test6'. replyPresenter parametersAt:#secondHeadLine put:'Test6'. aRequest nextPutLine:'<h1>This test is not available</h1>'. self addLinksForSource:#'test6:' previous:#'test5:' next:#'test7:' to:aRequest.
Index