X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=scripts%2Fexport_mp4chaps.lua;h=d5e7a5708e2e50606ecb1fe4f168bff0d1319adc;hb=05149f9bc54d0cfb8b162ba7cfac975b5eb79971;hp=b7ab23189c820787a9be2eabca6155d9e32cd786;hpb=9d927b54c178a90cc65eeffb01fe51ea6c3bba6a;p=ardour.git diff --git a/scripts/export_mp4chaps.lua b/scripts/export_mp4chaps.lua index b7ab23189c..d5e7a5708e 100644 --- a/scripts/export_mp4chaps.lua +++ b/scripts/export_mp4chaps.lua @@ -14,17 +14,17 @@ is not created. This is a bit more convenient than the export option, as one does not have to wait for the export. ]], - license = "GPLv2" + license = "GPLv2" } function factory (unused_params) return function () - fr = Session:frame_rate() + fr = Session:frame_rate() chaps = {} - for l in Session:locations():list():iter() do - name = l:name() - if not l:is_mark() or string.find(name, "^xrun%d*$") then + for l in Session:locations():list():iter() do + name = l:name() + if not l:is_mark() or string.find(name, "^xrun%d*$") then goto next end t = l:start() @@ -37,7 +37,7 @@ function factory (unused_params) return function () ms = math.floor(r*1000/fr) table.insert(chaps, string.format("%02d:%02d:%02d.%03d %s\n", h, m, s, ms, name)) ::next:: - end + end if next(chaps) == nil then goto out end @@ -45,11 +45,11 @@ function factory (unused_params) return function () table.insert(chaps, "00:00:00.000 Intro\n") table.sort(chaps) - file = io.open(string.format("%s/export/mp4chaps.txt", Session:path()), "w") + file = io.open(ARDOUR.LuaAPI.build_filename (Session:path(), "export", "mp4chaps.txt"), "w") for i, line in ipairs(chaps) do file:write(line) end - file:close() + file:close() ::out:: end end