task_list 1.0.2

data/test/task_list/filter_test.rb

@@ -0,0 +1,142 @@
+# encoding: utf-8
+require File.expand_path('../../test_helper', __FILE__)
+require 'task_list/filter'
+
+class TaskList::FilterTest < Minitest::Test
+  def setup
+    @pipeline = HTML::Pipeline.new [
+      HTML::Pipeline::MarkdownFilter,
+      TaskList::Filter
+    ], {}, {}
+
+    @context = {}
+    @item_selector = "input.task-list-item-checkbox[type=checkbox]"
+  end
+
+  def test_filters_items_in_a_list
+    text = <<-md
+- [ ] incomplete
+- [x] complete
+    md
+    assert_equal 2, filter(text)[:output].css(@item_selector).size
+  end
+
+  def test_filters_items_with_HTML_contents
+    text = <<-md
+- [ ] incomplete **with bold** text
+- [x] complete __with italic__ text
+    md
+    assert_equal 2, filter(text)[:output].css(@item_selector).size
+  end
+
+  def test_filters_items_in_a_list_wrapped_in_paras
+    # See issue #7951 for details.
+    text = <<-md
+- [ ] one
+- [ ] this one will be wrapped in a para
+
+- [ ] this one too, wtf
+    md
+    assert_equal 3, filter(text)[:output].css(@item_selector).size
+  end
+
+  def test_populates_result_with_task_list_items
+    text = <<-md
+- [ ] incomplete
+- [x] complete
+    md
+
+    result = filter(text)
+    assert !result[:task_list_items].empty?
+    incomplete, complete = result[:task_list_items]
+
+    assert incomplete
+    assert !incomplete.complete?
+
+    assert complete
+    assert complete.complete?
+  end
+
+  def test_skips_lists_in_code_blocks
+    code = <<-md
+```
+- [ ] incomplete
+- [x] complete
+```
+    md
+
+    assert filter(code)[:output].css(@item_selector).empty?,
+      "should not have any task list items"
+  end
+
+  def test_handles_encoding_correctly
+    unicode = "中文"
+    text = <<-md
+- [ ] #{unicode}
+    md
+    assert item = filter(text)[:output].css('.task-list-item').pop
+    assert_equal unicode, item.text.strip
+  end
+
+  def test_handles_nested_items
+    text = <<-md
+- [ ] one
+  - [ ] one.one
+    md
+    assert item = filter(text)[:output].css('.task-list-item .task-list-item').pop
+  end
+
+  def test_handles_complicated_nested_items
+    text = <<-md
+- [ ] one
+  - [ ] one.one
+  - [x] one.two
+    - [ ] one.two.one
+    - [ ] one.two.two
+  - [ ] one.three
+  - [ ] one.four
+- [ ] two
+  - [x] two.one
+  - [ ] two.two
+- [ ] three
+    md
+
+    assert_equal 6 + 2, filter(text)[:output].css('.task-list-item .task-list-item').size
+    assert_equal 2, filter(text)[:output].css('.task-list-item .task-list-item .task-list-item').size
+  end
+
+  # NOTE: This is an edge case experienced regularly by users using a Swiss
+  # German keyboard.
+  # See: https://github.com/github/github/pull/18362
+  def test_non_breaking_space_between_brackets
+    text = "- [\xC2\xA0] ok"
+    assert item = filter(text)[:output].css('.task-list-item').pop, "item expected"
+    assert_equal 'ok', item.text.strip
+  end
+
+  # See: https://github.com/github/github/pull/18362
+  def test_non_breaking_space_between_brackets_in_paras
+    text = <<-md
+- [\xC2\xA0] one
+- [\xC2\xA0] this one will be wrapped in a para
+
+- [\xC2\xA0] this one too, wtf
+    md
+    assert_equal 3, filter(text)[:output].css(@item_selector).size
+  end
+
+  def test_capital_X
+    text = <<-md
+- [x] lower case
+- [X] capital
+    md
+    assert_equal 2, filter(text)[:output].css("[checked]").size
+  end
+
+  protected
+
+  def filter(input, context = @context, result = nil)
+    result ||= {}
+    @pipeline.call(input, context, result)
+  end
+end

data/test/task_list/summary_test.rb

@@ -0,0 +1,40 @@
+# encoding: utf-8
+require File.expand_path('../../test_helper', __FILE__)
+require 'task_list/summary'
+
+class TaskList::SummaryTest < Minitest::Test
+  def setup
+    @complete   = make_item "[x]", "complete"
+    @incomplete = make_item "[ ]", "incomplete"
+    @items = [@complete, @incomplete]
+    @summary = make_summary @items
+  end
+
+  def test_no_items
+    summary = make_summary []
+    assert !summary.items?, "no task list items are expected"
+  end
+
+  def test_items
+    assert @summary.items?, "task list items are expected"
+    assert_equal 2, @summary.item_count
+  end
+
+  def test_complete_count
+    assert_equal 1, @summary.complete_count
+  end
+
+  def test_incomplete_count
+    assert_equal 1, @summary.incomplete_count
+  end
+
+  protected
+
+  def make_item(checkbox_text = "[ ]", source = "an item!")
+    TaskList::Item.new(checkbox_text, source)
+  end
+
+  def make_summary(items)
+    TaskList::Summary.new(items)
+  end
+end

data/test/task_list_test.rb

@@ -0,0 +1,33 @@
+# encoding: utf-8
+require File.expand_path('../test_helper', __FILE__)
+require 'task_list'
+require 'task_list/filter'
+
+class TaskListTest < Minitest::Test
+  class Record < Struct.new(:body)
+    def task_list_items
+      []
+    end
+  end
+
+  def test_has_summary
+    assert summary = task_list("- [ ] one").summary, "summary expected"
+    assert_kind_of TaskList::Summary, summary
+  end
+
+  def test_complete_item
+    item = TaskList::Item.new("[x]", "complete")
+    assert item.complete?, "expected to be complete"
+  end
+
+  def test_incomplete_item
+    item = TaskList::Item.new("[ ]", "incomplete")
+    assert !item.complete?, "expected to be incomplete"
+  end
+
+  protected
+
+  def task_list(text)
+    TaskList.new(Record.new(text))
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,3 @@
+$:.unshift "lib"
+require 'minitest/autorun'
+require 'task_list'

data/test/unit/test_events.coffee

@@ -0,0 +1,96 @@
+#= require task_list
+
+module "TaskList events",
+  setup: ->
+    @container = $ '<div>', class: 'js-task-list-container'
+
+    @list = $ '<ul>', class: 'task-list'
+    @item = $ '<li>', class: 'task-list-item'
+    @checkbox = $ '<input>',
+      type: 'checkbox'
+      class: 'task-list-item-checkbox'
+      disabled: true
+      checked: false
+
+    @field = $ '<textarea>', class: 'js-task-list-field', "- [ ] text"
+
+    @item.append @checkbox
+    @list.append @item
+    @container.append @list
+
+    @container.append @field
+
+    $('#qunit-fixture').append(@container)
+    @container.taskList()
+
+  teardown: ->
+    $(document).off 'tasklist:enabled'
+    $(document).off 'tasklist:disabled'
+    $(document).off 'tasklist:change'
+    $(document).off 'tasklist:changed'
+
+asyncTest "triggers a tasklist:change event before making task list item changes", ->
+  expect 1
+
+  @field.on 'tasklist:change', (event, index, checked) ->
+    ok true
+
+  setTimeout ->
+    start()
+  , 20
+
+  @checkbox.click()
+
+asyncTest "triggers a tasklist:changed event once a task list item changes", ->
+  expect 1
+
+  @field.on 'tasklist:changed', (event, index, checked) ->
+    ok true
+
+  setTimeout ->
+    start()
+  , 20
+
+  @checkbox.click()
+
+asyncTest "can cancel a tasklist:changed event", ->
+  expect 2
+
+  @field.on 'tasklist:change', (event, index, checked) ->
+    ok true
+    event.preventDefault()
+
+  @field.on 'tasklist:changed', (event, index, checked) ->
+    ok false
+
+  before = @checkbox.val()
+  setTimeout =>
+    equal before, @checkbox.val()
+    start()
+  , 20
+
+  @checkbox.click()
+
+asyncTest "enables task list items when a .js-task-list-field is present", ->
+  expect 1
+
+  $(document).on 'tasklist:enabled', (event) ->
+    ok true
+
+  @container.taskList()
+  setTimeout ->
+    start()
+  , 20
+
+asyncTest "doesn't enable task list items when a .js-task-list-field is absent", ->
+  expect 0
+
+  $(document).on 'tasklist:enabled', (event) ->
+    ok true
+
+  @field.remove()
+
+  @container.taskList()
+  setTimeout ->
+    start()
+  , 20

data/test/unit/test_updates.coffee

@@ -0,0 +1,566 @@
+#= require task_list
+
+module "TaskList updates",
+  setup: ->
+    @container = $ '<div>', class: 'js-task-list-container'
+
+    @list = $ '<ul>', class: 'task-list'
+
+    @completeItem = $ '<li>', class: 'task-list-item'
+    @completeCheckbox = $ '<input>',
+      type: 'checkbox'
+      class: 'task-list-item-checkbox'
+      disabled: true
+      checked: true
+
+    @incompleteItem = $ '<li>', class: 'task-list-item'
+    @incompleteCheckbox = $ '<input>',
+      type: 'checkbox'
+      class: 'task-list-item-checkbox'
+      disabled: true
+      checked: false
+
+    # non-breaking space. See: https://github.com/github/task-lists/pull/14
+    @nbsp = String.fromCharCode(160)
+    @incompleteNBSPItem = $ '<li>', class: 'task-list-item'
+    @incompleteNBSPCheckbox = $ '<input>',
+      type: 'checkbox'
+      class: 'task-list-item-checkbox'
+      disabled: true
+      checked: false
+
+    @blockquote = $ '<blockquote>'
+
+    @quotedList = $ '<ul>', class: 'task-list'
+
+    @quotedCompleteItem = $ '<li>', class: 'task-list-item'
+    @quotedCompleteCheckbox = $ '<input>',
+      type: 'checkbox'
+      class: 'task-list-item-checkbox'
+      disabled: true
+      checked: true
+
+    @quotedIncompleteItem = $ '<li>', class: 'task-list-item'
+    @quotedIncompleteCheckbox = $ '<input>',
+      type: 'checkbox'
+      class: 'task-list-item-checkbox'
+      disabled: true
+      checked: false
+
+    @innerBlockquote = $ '<blockquote>'
+
+    @innerList = $ '<ul>', class: 'task-list'
+
+    @innerCompleteItem = $ '<li>', class: 'task-list-item'
+    @innerCompleteCheckbox = $ '<input>',
+      type: 'checkbox'
+      class: 'task-list-item-checkbox'
+      disabled: true
+      checked: true
+
+    @innerIncompleteItem = $ '<li>', class: 'task-list-item'
+    @innerIncompleteCheckbox = $ '<input>',
+      type: 'checkbox'
+      class: 'task-list-item-checkbox'
+      disabled: true
+      checked: false
+
+    @orderedList = $ '<ol>', class: 'task-list'
+
+    @orderedCompleteItem = $ '<li>', class: 'task-list-item'
+    @orderedCompleteCheckbox = $ '<input>',
+      type: 'checkbox'
+      class: 'task-list-item-checkbox'
+      disabled: true
+      checked: true
+
+    @orderedIncompleteItem = $ '<li>', class: 'task-list-item'
+    @orderedIncompleteCheckbox = $ '<input>',
+      type: 'checkbox'
+      class: 'task-list-item-checkbox'
+      disabled: true
+      checked: false
+
+    @field = $ '<textarea>', class: 'js-task-list-field', text: """
+      - [x] complete
+      - [ ] incomplete
+      - [#{@nbsp}] incompleteNBSP
+      > - [x] quoted complete
+      > - [ ] quoted incomplete
+      >> - [x] inner complete
+      > > - [ ] inner incomplete
+      > 0. [x] ordered complete
+      > 0. [ ] ordered incomplete
+    """
+
+    @changes =
+      toComplete: """
+      - [ ] complete
+      - [ ] incomplete
+      - [#{@nbsp}] incompleteNBSP
+      > - [x] quoted complete
+      > - [ ] quoted incomplete
+      >> - [x] inner complete
+      > > - [ ] inner incomplete
+      > 0. [x] ordered complete
+      > 0. [ ] ordered incomplete
+      """
+      toQuotedComplete: """
+      - [x] complete
+      - [ ] incomplete
+      - [#{@nbsp}] incompleteNBSP
+      > - [ ] quoted complete
+      > - [ ] quoted incomplete
+      >> - [x] inner complete
+      > > - [ ] inner incomplete
+      > 0. [x] ordered complete
+      > 0. [ ] ordered incomplete
+      """
+      toInnerComplete: """
+      - [x] complete
+      - [ ] incomplete
+      - [#{@nbsp}] incompleteNBSP
+      > - [x] quoted complete
+      > - [ ] quoted incomplete
+      >> - [ ] inner complete
+      > > - [ ] inner incomplete
+      > 0. [x] ordered complete
+      > 0. [ ] ordered incomplete
+      """
+      toOrderedComplete: """
+      - [x] complete
+      - [ ] incomplete
+      - [#{@nbsp}] incompleteNBSP
+      > - [x] quoted complete
+      > - [ ] quoted incomplete
+      >> - [x] inner complete
+      > > - [ ] inner incomplete
+      > 0. [ ] ordered complete
+      > 0. [ ] ordered incomplete
+      """
+      toIncomplete: """
+      - [x] complete
+      - [x] incomplete
+      - [#{@nbsp}] incompleteNBSP
+      > - [x] quoted complete
+      > - [ ] quoted incomplete
+      >> - [x] inner complete
+      > > - [ ] inner incomplete
+      > 0. [x] ordered complete
+      > 0. [ ] ordered incomplete
+      """
+      toQuotedIncomplete: """
+      - [x] complete
+      - [ ] incomplete
+      - [#{@nbsp}] incompleteNBSP
+      > - [x] quoted complete
+      > - [x] quoted incomplete
+      >> - [x] inner complete
+      > > - [ ] inner incomplete
+      > 0. [x] ordered complete
+      > 0. [ ] ordered incomplete
+      """
+      toInnerIncomplete: """
+      - [x] complete
+      - [ ] incomplete
+      - [#{@nbsp}] incompleteNBSP
+      > - [x] quoted complete
+      > - [ ] quoted incomplete
+      >> - [x] inner complete
+      > > - [x] inner incomplete
+      > 0. [x] ordered complete
+      > 0. [ ] ordered incomplete
+      """
+      toOrderedIncomplete: """
+      - [x] complete
+      - [ ] incomplete
+      - [#{@nbsp}] incompleteNBSP
+      > - [x] quoted complete
+      > - [ ] quoted incomplete
+      >> - [x] inner complete
+      > > - [ ] inner incomplete
+      > 0. [x] ordered complete
+      > 0. [x] ordered incomplete
+      """
+      toIncompleteNBSP: """
+      - [x] complete
+      - [ ] incomplete
+      - [x] incompleteNBSP
+      > - [x] quoted complete
+      > - [ ] quoted incomplete
+      >> - [x] inner complete
+      > > - [ ] inner incomplete
+      > 0. [x] ordered complete
+      > 0. [ ] ordered incomplete
+      """
+
+    @completeItem.append @completeCheckbox
+    @list.append @completeItem
+    @completeItem.expectedIndex = 1
+
+    @incompleteItem.append @incompleteCheckbox
+    @list.append @incompleteItem
+    @incompleteItem.expectedIndex = 2
+
+    @incompleteNBSPItem.append @incompleteNBSPCheckbox
+    @list.append @incompleteNBSPItem
+    @incompleteNBSPItem.expectedIndex = 3
+
+    @container.append @list
+    @container.append @field
+
+    @quotedCompleteItem.append @quotedCompleteCheckbox
+    @quotedList.append @quotedCompleteItem
+    @quotedCompleteItem.expectedIndex = 4
+
+    @quotedIncompleteItem.append @quotedIncompleteCheckbox
+    @quotedList.append @quotedIncompleteItem
+    @quotedIncompleteItem.expectedIndex = 5
+
+    @blockquote.append @quotedList
+
+    @innerCompleteItem.append @innerCompleteCheckbox
+    @innerList.append @innerCompleteItem
+    @innerCompleteItem.expectedIndex = 6
+
+    @innerIncompleteItem.append @innerIncompleteCheckbox
+    @innerList.append @innerIncompleteItem
+    @innerIncompleteItem.expectedIndex = 7
+
+    @innerBlockquote.append @innerList
+    @innerBlockquote.append @innerField
+
+    @blockquote.append @innerBlockquote
+
+    @container.append @blockquote
+
+    @orderedCompleteItem.append @orderedCompleteCheckbox
+    @orderedList.append @orderedCompleteItem
+    @orderedCompleteItem.expectedIndex = 8
+
+    @orderedIncompleteItem.append @orderedIncompleteCheckbox
+    @orderedList.append @orderedIncompleteItem
+    @orderedIncompleteItem.expectedIndex = 9
+
+    @container.append @orderedList
+
+    @blockquote.append @field
+
+    $('#qunit-fixture').append(@container)
+    @container.taskList()
+
+  teardown: ->
+    $(document).off 'tasklist:changed'
+
+asyncTest "updates the source, marking the incomplete item as complete", ->
+  expect 3
+
+  @field.on 'tasklist:changed', (event, index, checked) =>
+    ok checked
+    equal index, @incompleteItem.expectedIndex
+    equal @field.val(), @changes.toIncomplete
+
+  setTimeout ->
+    start()
+  , 20
+
+  @incompleteCheckbox.click()
+
+asyncTest "updates the source, marking the complete item as incomplete", ->
+  expect 3
+
+  @field.on 'tasklist:changed', (event, index, checked) =>
+    ok !checked
+    equal index, @completeItem.expectedIndex
+    equal @field.val(), @changes.toComplete
+
+  setTimeout ->
+    start()
+  , 20
+
+  @completeCheckbox.click()
+
+# See: https://github.com/github/task-lists/pull/14
+asyncTest "updates the source for items with non-breaking spaces", ->
+  expect 3
+
+  @field.on 'tasklist:changed', (event, index, checked) =>
+    ok checked
+    equal index, @incompleteNBSPItem.expectedIndex
+    equal @field.val(), @changes.toIncompleteNBSP
+
+  setTimeout ->
+    start()
+  , 20
+
+  @incompleteNBSPCheckbox.click()
+
+asyncTest "updates the source of a quoted item, marking the incomplete item as complete", ->
+  expect 3
+
+  @field.on 'tasklist:changed', (event, index, checked) =>
+    ok checked
+    equal index, @quotedIncompleteItem.expectedIndex
+    equal @field.val(), @changes.toQuotedIncomplete
+
+  setTimeout ->
+    start()
+  , 20
+
+  @quotedIncompleteCheckbox.click()
+
+asyncTest "updates the source of a quoted item, marking the complete item as incomplete", ->
+  expect 3
+
+  @field.on 'tasklist:changed', (event, index, checked) =>
+    ok !checked
+    equal index, @quotedCompleteItem.expectedIndex
+    equal @field.val(), @changes.toQuotedComplete
+
+  setTimeout ->
+    start()
+  , 20
+
+  @quotedCompleteCheckbox.click()
+
+asyncTest "updates the source of a quoted quoted item, marking the incomplete item as complete", ->
+  expect 3
+
+  @field.on 'tasklist:changed', (event, index, checked) =>
+    ok checked
+    equal index, @innerIncompleteItem.expectedIndex
+    equal @field.val(), @changes.toInnerIncomplete
+
+  setTimeout ->
+    start()
+  , 20
+
+  @innerIncompleteCheckbox.click()
+
+asyncTest "updates the source of a quoted quoted item, marking the complete item as incomplete", ->
+  expect 3
+
+  @field.on 'tasklist:changed', (event, index, checked) =>
+    ok !checked
+    equal index, @innerCompleteItem.expectedIndex
+    equal @field.val(), @changes.toInnerComplete
+
+  setTimeout ->
+    start()
+  , 20
+
+  @innerCompleteCheckbox.click()
+
+asyncTest "updates the source of an ordered list item, marking the incomplete item as complete", ->
+  expect 3
+
+  @field.on 'tasklist:changed', (event, index, checked) =>
+    ok checked
+    equal index, @orderedIncompleteItem.expectedIndex
+    equal @field.val(), @changes.toOrderedIncomplete
+
+  setTimeout ->
+    start()
+  , 20
+
+  @orderedIncompleteCheckbox.click()
+
+asyncTest "updates the source of an ordered list item, marking the complete item as incomplete", ->
+  expect 3
+
+  @field.on 'tasklist:changed', (event, index, checked) =>
+    ok !checked
+    equal index, @orderedCompleteItem.expectedIndex
+    equal @field.val(), @changes.toOrderedComplete
+
+  setTimeout ->
+    start()
+  , 20
+
+  @orderedCompleteCheckbox.click()
+
+asyncTest "update ignores items that look like Task List items but lack list prefix", ->
+  expect 3
+
+  $('#qunit-fixture').empty()
+
+  container = $ '<div>', class: 'js-task-list-container'
+
+  list = $ '<ul>', class: 'task-list'
+
+  item1 = $ '<li>', class: 'task-list-item'
+  item1Checkbox = $ '<input>',
+    type: 'checkbox'
+    class: 'task-list-item-checkbox'
+    disabled: true
+    checked: false
+
+  item2 = $ '<li>', class: 'task-list-item'
+  item2Checkbox = $ '<input>',
+    type: 'checkbox'
+    class: 'task-list-item-checkbox'
+    disabled: true
+    checked: false
+
+  field = $ '<textarea>', class: 'js-task-list-field', text: """
+    [ ] one
+    [ ] two
+    - [ ] three
+    - [ ] four
+  """
+
+  changes = """
+    [ ] one
+    [ ] two
+    - [ ] three
+    - [x] four
+  """
+
+  item1.append item1Checkbox
+  list.append item1
+  item1.expectedIndex = 1
+
+  item2.append item2Checkbox
+  list.append item2
+  item2.expectedIndex = 2
+
+  container.append list
+  container.append field
+
+  $('#qunit-fixture').append(container)
+  container.taskList()
+
+  field.on 'tasklist:changed', (event, index, checked) =>
+    ok checked
+    equal index, item2.expectedIndex
+    equal field.val(), changes
+
+  setTimeout ->
+    start()
+  , 20
+
+  item2Checkbox.click()
+
+asyncTest "update ignores items that look like Task List items but are links", ->
+  expect 3
+
+  $('#qunit-fixture').empty()
+
+  container = $ '<div>', class: 'js-task-list-container'
+
+  list = $ '<ul>', class: 'task-list'
+
+  item1 = $ '<li>', class: 'task-list-item'
+  item1Checkbox = $ '<input>',
+    type: 'checkbox'
+    class: 'task-list-item-checkbox'
+    disabled: true
+    checked: false
+
+  item2 = $ '<li>', class: 'task-list-item'
+  item2Checkbox = $ '<input>',
+    type: 'checkbox'
+    class: 'task-list-item-checkbox'
+    disabled: true
+    checked: false
+
+  field = $ '<textarea>', class: 'js-task-list-field', text: """
+    - [ ] (link)
+    - [ ] [reference]
+    - [ ] () collapsed
+    - [ ] [] collapsed reference
+    - [ ] \\(escaped item)
+    - [ ] item
+  """
+
+  changes = """
+    - [ ] (link)
+    - [ ] [reference]
+    - [ ] () collapsed
+    - [ ] [] collapsed reference
+    - [ ] \\(escaped item)
+    - [x] item
+  """
+
+  item1.append item1Checkbox
+  list.append item1
+  item1.expectedIndex = 1
+
+  item2.append item2Checkbox
+  list.append item2
+  item2.expectedIndex = 2
+
+  container.append list
+  container.append field
+
+  $('#qunit-fixture').append(container)
+  container.taskList()
+
+  field.on 'tasklist:changed', (event, index, checked) =>
+    ok checked
+    equal index, item2.expectedIndex
+    equal field.val(), changes
+
+  setTimeout ->
+    start()
+  , 20
+
+  item2Checkbox.click()
+
+asyncTest "updates items followed by links", ->
+  expect 3
+
+  $('#qunit-fixture').empty()
+
+  container = $ '<div>', class: 'js-task-list-container'
+
+  list = $ '<ul>', class: 'task-list'
+
+  item1 = $ '<li>', class: 'task-list-item'
+  item1Checkbox = $ '<input>',
+    type: 'checkbox'
+    class: 'task-list-item-checkbox'
+    disabled: true
+    checked: false
+
+  item2 = $ '<li>', class: 'task-list-item'
+  item2Checkbox = $ '<input>',
+    type: 'checkbox'
+    class: 'task-list-item-checkbox'
+    disabled: true
+    checked: false
+
+  field = $ '<textarea>', class: 'js-task-list-field', text: """
+    - [ ] [link label](link)
+    - [ ] [reference label][reference]
+  """
+
+  changes = """
+    - [ ] [link label](link)
+    - [x] [reference label][reference]
+  """
+
+  item1.append item1Checkbox
+  list.append item1
+  item1.expectedIndex = 1
+
+  item2.append item2Checkbox
+  list.append item2
+  item2.expectedIndex = 2
+
+  container.append list
+  container.append field
+
+  $('#qunit-fixture').append(container)
+  container.taskList()
+
+  field.on 'tasklist:changed', (event, index, checked) =>
+    ok checked
+    equal index, item2.expectedIndex
+    equal field.val(), changes
+
+  setTimeout ->
+    start()
+  , 20
+
+  item2Checkbox.click()