13
0

NO-OP: documentation/comments

This commit is contained in:
Robin Gareus 2019-06-24 15:09:34 +02:00
parent a3f8449595
commit 0bd6b0ee3d
Signed by: rgareus
GPG Key ID: A090BCE02CF57F04

View File

@ -7,23 +7,30 @@ ardour {
function factory () return function ()
-- sort compare function
-- a,b here are http://manual.ardour.org/lua-scripting/class_reference/#ARDOUR:Route
-- return true if route "a" should be ordered before route "b"
function tsort (a, b)
return a:name() < b:name()
end
-- create a sortable list of tracks
local tracklist = {}
for t in Session:get_tracks():iter() do
table.insert(tracklist, t)
end
-- sort the list using the compare function
table.sort(tracklist, tsort)
-- traverse the sorted list and assign "presentation-order" to each track
local pos = 1;
for _, t in ipairs(tracklist) do
t:set_presentation_order(pos)
pos = pos + 1
end
-- drop all track references
tracklist = nil
collectgarbage ()
end end