Mercurial > hg > orthanc

comparison Resources/Toolbox.lua @ 1006:649d47854314 lua-scripting

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
proper handling of metadata in Store
author Sebastien Jodogne <s.jodogne@gmail.com>
date Tue, 08 Jul 2014 15:11:00 +0200
parents b79bf2f4ab2e
children 160dfe770618
comparison
equal deleted inserted replaced
1005:84b6d7bca6db 1006:649d47854314
4 Set indent ("") to prefix each line: Mytable [KEY] [KEY]...[KEY] VALUE 4 Set indent ("") to prefix each line: Mytable [KEY] [KEY]...[KEY] VALUE
5 Source: https://gist.github.com/stuby/5445834#file-rprint-lua 5 Source: https://gist.github.com/stuby/5445834#file-rprint-lua
6 --]] 6 --]]
7 7
8 function PrintRecursive(s, l, i) -- recursive Print (structure, limit, indent) 8 function PrintRecursive(s, l, i) -- recursive Print (structure, limit, indent)
9 l = (l) or 100; i = i or ""; -- default item limit, indent string 9 l = (l) or 100; -- default item limit
10 i = i or ""; -- indent string
10 if (l<1) then print "ERROR: Item limit reached."; return l-1 end; 11 if (l<1) then print "ERROR: Item limit reached."; return l-1 end;
11 local ts = type(s); 12 local ts = type(s);
12 if (ts ~= "table") then print (i,ts,s); return l-1 end 13 if (ts ~= "table") then print (i,ts,s); return l-1 end
13 print (i,ts); -- print "table" 14 print (i,ts); -- print "table"
14 for k,v in pairs(s) do -- print "[KEY] VALUE" 15 for k,v in pairs(s) do -- print "[KEY] VALUE"