blob: 92c9aaaa196977f96a57f924219b5a9deb60c774 (
plain)
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
|
ardour {
["type"] = "EditorAction",
name = "Track Sort",
author = "Ardour Lua Taskforce",
description = [[Sort tracks alphabetically by name]]
}
function factory () return function ()
function tsort (a, b)
return a:name() < b:name()
end
local tracklist = {}
for t in Session:get_tracks():iter() do
table.insert(tracklist, t)
print (t:name(), t:presentation_info_ptr():order())
end
table.sort(tracklist, tsort)
local pos = 1;
for _, t in ipairs(tracklist) do
t:set_presentation_order(pos)
pos = pos + 1
end
tracklist = nil
collectgarbage ()
end end
|
