<?xml version="1.0"?>
<paste-with-annotations>
  <paste>
    <number>
      <integer>55808</integer>
    </number>
    <user>
      <string>turbo24prg</string>
    </user>
    <title>
      <string>url-map-definer example usage</string>
    </title>
    <contents>
      <string>define url-map
  &quot;/pages&quot;
    get () =&gt; (list-pages),
    get (&quot;^(?P&lt;name&gt;\\w+)/?$&quot;) =&gt; (show-page),
    get (&quot;^(?P&lt;name&gt;\\w+)/edit$&quot;) =&gt; (show-edit-page),
    get (&quot;^(?P&lt;name&gt;\\w+)/delete$&quot;) =&gt; (show-delete-page),
    post () =&gt; (create-page),
    post (&quot;^(?P&lt;name&gt;\\w+)(/(edit)?)?$&quot;) =&gt; (edit-page),
    post (&quot;^(?P&lt;name&gt;\\w+)/delete$&quot;) =&gt; (delete-page);
  &quot;/foo&quot; 
    ...
end;
</string>
    </contents>
    <universal-time>
      <integer>3411828016</integer>
    </universal-time>
    <channel>
      <string>#dylan</string>
    </channel>
    <colorization-mode>
      <string></string>
    </colorization-mode>
    <maybe-spam>
      <null/>
    </maybe-spam>
    <is-unicode>
      <null/>
    </is-unicode>
  </paste>
  <annotation>
    <number>
      <integer>1</integer>
    </number>
    <user>
      <string>turbo24prg</string>
    </user>
    <title>
      <string>wish-list: url alias, multiple method mapping</string>
    </title>
    <contents>
      <string>define url-map
  url (&quot;/pages&quot;, &quot;/articles&quot;),
    action (get, post) () =&gt; list-pages,
    action get (&quot;^(?P&lt;name&gt;\\w+)/?$&quot;) =&gt; (show-page, foo);
  url &quot;/test&quot;,
    ...
end;</string>
    </contents>
    <universal-time>
      <integer>3411923597</integer>
    </universal-time>
    <channel>
      <string>#dylan</string>
    </channel>
    <colorization-mode>
      <string></string>
    </colorization-mode>
    <maybe-spam>
      <null/>
    </maybe-spam>
    <is-unicode>
      <null/>
    </is-unicode>
  </annotation>
</paste-with-annotations>