1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
|
local tasty = require 'tasty'
local structure = require 'pandoc.structure'
local path = require 'pandoc.path'
local system = require 'pandoc.system'
local assert = tasty.assert
local test = tasty.test_case
local group = tasty.test_group
return {
test('is table', function ()
assert.are_equal(type(structure), 'table')
end),
group 'make_sections' {
test('sanity check', function ()
local blks = {
pandoc.Header(1, {pandoc.Str 'First'}),
pandoc.Header(2, {pandoc.Str 'Second'}),
pandoc.Header(2, {pandoc.Str 'Third'}),
}
local opts = PANDOC_WRITER_OPTIONS
local hblks = structure.make_sections(blks, opts)
assert.are_equal('Div', hblks[1].t)
assert.are_equal('Header', hblks[1].content[1].t)
end),
test('respects number_sections', function ()
local blks = {
pandoc.Header(1, {pandoc.Str 'First'}),
pandoc.Para 'Vestibulum convallis, lorem a tempus semper.'
}
local hblks = structure.make_sections(blks, {number_sections = true})
assert.are_equal('Div', hblks[1].t)
assert.are_equal('Header', hblks[1].content[1].t)
assert.are_equal('1', hblks[1].content[1].attributes['number'])
end),
test('respects base_level', function ()
local blks = {
pandoc.Header(1, {pandoc.Str 'First'}),
pandoc.Para 'Curabitur lacinia pulvinar nibh.',
pandoc.Header(3, {pandoc.Str 'First'}), -- Skipping level 2
}
local opts = {
number_sections = true,
base_level = 1
}
local hblks = structure.make_sections(blks, opts)
assert.are_equal('Div', hblks[1].t)
assert.are_equal('Header', hblks[1].content[1].t)
assert.are_equal('1', hblks[1].content[1].attributes['number'])
assert.are_equal('1.0.1', hblks[1].content[3].attributes['number'])
end)
},
group 'split_into_chunks' {
test('is function', function ()
assert.are_equal(type(structure.split_into_chunks), 'function')
end),
test('returns a chunked doc', function ()
assert.are_equal(
pandoc.utils.type(structure.split_into_chunks(pandoc.Pandoc{})),
'ChunkedDoc'
)
end),
},
group 'table_of_contents' {
test('is function', function ()
assert.are_equal(type(structure.table_of_contents), 'function')
end),
test('returns a bullet list', function ()
assert.are_equal(
pandoc.utils.type(structure.table_of_contents{}),
'Block'
)
assert.are_equal(
structure.table_of_contents{}.t,
'BulletList'
)
end),
test('returns a toc for a list of blocks', function ()
local body = pandoc.Blocks{
pandoc.Header(1, 'First'),
pandoc.Para('A sentence placed below the first structure.'),
pandoc.Header(2, 'Subsection'),
pandoc.Para('Mauris ac felis vel velit tristique imperdiet.'),
pandoc.Header(1, 'Second'),
pandoc.Para('Integer placerat tristique nisl.')
}
assert.are_equal(
structure.table_of_contents(body),
pandoc.BulletList{
{pandoc.Plain('First'),
pandoc.BulletList{{pandoc.Plain 'Subsection'}}
},
{pandoc.Plain('Second')}
}
)
end),
test('returns a toc for a chunked doc', function ()
local doc = pandoc.Pandoc {
pandoc.Header(1, 'First', {id='first'}),
pandoc.Para('A sentence placed below the first structure.'),
pandoc.Header(2, 'Subsection', {id='subsection'}),
pandoc.Para('Mauris ac felis vel velit tristique imperdiet.'),
pandoc.Header(1, 'Second', {id='second'}),
pandoc.Para('Integer placerat tristique nisl.')
}
local chunked = structure.split_into_chunks(doc, {chunk_level = 2})
assert.are_equal(
structure.table_of_contents(chunked),
pandoc.BulletList{
{pandoc.Plain({pandoc.Link('First', 'chunk-001#first', '', {id='toc-first'})}),
pandoc.BulletList{{pandoc.Plain({pandoc.Link('Subsection', 'chunk-002#subsection', '', {id='toc-subsection'})})}}
},
{pandoc.Plain({pandoc.Link('Second', 'chunk-003#second', '', {id='toc-second'})})}
}
)
end),
test('respects toc-depth option', function ()
local doc = pandoc.Pandoc {
pandoc.Header(1, 'First', {id='first'}),
pandoc.Para('A sentence placed below the first structure.'),
pandoc.Header(2, 'Subsection', {id='subsection'}),
pandoc.Para('Mauris ac felis vel velit tristique imperdiet.'),
pandoc.Header(1, 'Second', {id='second'}),
pandoc.Para('Integer placerat tristique nisl.')
}
local chunked = structure.split_into_chunks(doc)
assert.are_equal(
structure.table_of_contents(chunked, {toc_depth = 1}),
pandoc.BulletList{
{pandoc.Plain({pandoc.Link('First', 'chunk-001#first', '', {id='toc-first'})})},
{pandoc.Plain({pandoc.Link('Second', 'chunk-002#second', '', {id='toc-second'})})}
}
)
end),
},
group 'unique_identifier' {
test('returns an identifier based on the input', function ()
local inlines = pandoc.Inlines{pandoc.Emph{'This'}, ' is nice'}
local id = structure.unique_identifier(inlines)
assert.are_equal('this-is-nice', id)
end),
test('respects the list of used IDs', function ()
local inlines = pandoc.Inlines('Hello, World!')
local used = {['hello-world'] = true}
local id = structure.unique_identifier(inlines, used)
assert.are_equal('hello-world-1', id)
end),
test('defaults to pandoc Markdown identifiers', function ()
local inlines = pandoc.Inlines('Mr. Jones')
local id = structure.unique_identifier(inlines, {})
assert.are_equal('mr.-jones', id)
end),
test('can generate gfm identifiers', function ()
local inlines = pandoc.Inlines('Mr. Jones')
local exts = {'gfm_auto_identifiers'}
local id = structure.unique_identifier(inlines, {}, exts)
assert.are_equal('mr-jones', id)
end),
}
}
|
