add Double Commander scripts
New script for opening folders in the other pane
This commit is contained in:
@@ -0,0 +1,14 @@
|
||||
local params = {...}
|
||||
|
||||
local sn = debug.getinfo(1).source
|
||||
if string.sub(sn, 1, 1) == '@' then sn = string.sub(sn, 2, -1) end
|
||||
sn = SysUtils.ExtractFileName(sn)
|
||||
|
||||
if #params ~= 1 then
|
||||
Dialogs.MessageBox('Check the number of parameters!\nRequires only one.', sn, 0x0030)
|
||||
return
|
||||
end
|
||||
|
||||
DC.ExecuteCommand('cm_FocusSwap')
|
||||
DC.ExecuteCommand('cm_NewTab')
|
||||
DC.ExecuteCommand('cm_ChangeDir', params[1])
|
||||
Reference in New Issue
Block a user