content-template.html

<a id="Logout" href="/logout">logout</a>
@when[current-case]{
    @list{
    <div id="CurrentCase">
        <span class="description">
            You're working on <q>@(case-project current-case): @(case-title current-case)</q>
        </span>
        <a id="StopWork" href="@stop-work-url">Stop Work</a>
        <a id="ResolveCase" href="@(resolve-bug-url (case-id current-case))">Resolve</a>
    </div>
   }
}
@in[project estimated]{
    <h2> @(project-title project) </h2>
        <ul>
        @in[case (filter (compose not case-resolved?) (project-cases project))]{
            <li class="@(case-class case)">
                <a class="details" href="http://fogbugz.phosphor.co.nz/default.asp?@(case-id case)">
                    @(case-id case)
                </a>
                <ul class="quick-intervals">
                    <li> <a class="quick-interval" href="@(quick-interval-url (case-id case) 5)">5</a> </li>
                    <li> <a class="quick-interval" href="@(quick-interval-url (case-id case) 10)">10</a> </li>
                    <li> <a class="quick-interval" href="@(quick-interval-url (case-id case) 15)">15</a> </li>
                    <li> <a class="quick-interval" href="@(quick-interval-url (case-id case) 30)">30</a> </li>
                </ul>
                <a class="startWork" href="@(start-work-url (case-id case))">
                    @(case-title case)
                </a>
            </li>
        }
        @in[case (filter case-resolved? (project-cases project))]{
            <li class="@(case-class case)">
                <a class="details" href="http://fogbugz.phosphor.co.nz/default.asp?@(case-id case)">
                    @(case-id case)
                </a>
                @(case-title case)
                <a href="@(close-bug-url (case-id case))" class="close-case">close</a>
            </li>
        }
        </ul>
}

@unless[(null? unestimated)]{
    @list{
        <h1>Add an estimate</h1>
        @in[project unestimated]{
            <h2>@(project-title project)</h2>
            <ul>
              @in[case (project-cases project)]{
              <li class="unestimated">
                <a class="details" href="http://fogbugz.phosphor.co.nz/default.asp?@(case-id case)">@(case-id case)</a>
                <ul class="estimates">
                    <li> <a href="@(set-estimate-url (case-id case) 0.5)">&frac12;</a> </li>
                    <li> <a href="@(set-estimate-url (case-id case) 1)">1</a> </li>
                    <li> <a href="@(set-estimate-url (case-id case) 2)">2</a> </li>
                    <li> <a href="@(set-estimate-url (case-id case) 4)">4</a> </li>
                    <li> <a href="@(set-estimate-url (case-id case) 12)">12</a> </li>
                </ul>
                <div class="case">
                    @(case-title case)
                </div>
              </li>
              }
          </ul>
        }
  }
}