[SciTE] 블록으로 지정한 구간 정렬하기

블록으로 지정한 구간을 정렬해준다. 자주 쓰이지는 않지만, 그래도 아쉬울 때가 있다. SciteSortSelection에서 가져와 extman에 등록해서 사용할 수 있도록 수정했다.

SciTE_SortSelection.lua

1. -- Sort a selected text
   
2. -- The functions below will sort the selected text in alphabetical or alphabetical reverse order.
   
3. -- From http://lua-users.org/wiki/SciteSortSelection
   
4. 
   
5. scite_Command {
   
6.     'Sort Selection|sort_text',
   
7.     'Sort Selection Reverse|sort_text_reverse',
   
8. }
   
9. 
   
10. function lines(str)
    
11.     local t = {}
    
12.     local i, lstr = 1, #str
    
13.     while i <= lstr do
    
14.         local x, y = string.find(str, "\r?\n", i)
    
15.         if x then t[#t + 1] = string.sub(str, i, x - 1)
    
16.         else break
    
17.         end
    
18.         i = y + 1
    
19.     end
    
20.     if i <= lstr then t[#t + 1] = string.sub(str, i) end
    
21.     return t
    
22. end
    
23. 
    
24. function sort_text()
    
25.     local sel = editor:GetSelText()
    
26.     if #sel == 0 then return end
    
27.     local eol = string.match(sel, "\n$")
    
28.     local buf = lines(sel)
    
29.     --table.foreach(buf, print) --used for debugging
    
30.     table.sort(buf)
    
31.     local out = table.concat(buf, "\n")
    
32.     if eol then out = out.."\n" end
    
33.     editor:ReplaceSel(out)
    
34. end
    
35. 
    
36. function sort_text_reverse()
    
37.     local sel = editor:GetSelText()
    
38.     if #sel == 0 then return end
    
39.     local eol = string.match(sel, "\n$")
    
40.     local buf = lines(sel)
    
41.     --table.foreach(buf, print) --used for debugging
    
42.     table.sort(buf, function(a, b) return a > b end)
    
43.     local out = table.concat(buf, "\n")
    
44.     if eol then out = out.."\n" end
    
45.     editor:ReplaceSel(out)
    
46. end