test1:aRequest
    "a simple reply, with an URL refering to another method inside myself.

     Invoke via the browser as URL:
        host:port/<N>,test1:
     where <N> is the registered name of this service.
    "

    |replyPresenter|

    replyPresenter := aRequest replyPresenter.
    replyPresenter title:'Hello world Example'.
    replyPresenter parametersAt:#secondHeadLine put:'Test1: Hello world Example'.
    aRequest
        nextPutLine:'<h1>Hello World</h1>'.