|Description||Decrease depth level of current directory|
|Plugins Called||file, win, tc|
local Path = file.folder(arg(1)) Path = file.folder(Path) local hwnd = win.handle("c=TTOTAL_CMD") local List, Count, Dest, Folder for(1) List = file.listfiles(Path, "2") Count = line(List, 0) if(Count < 2) do Folder = ifelse(Dest == "", remove(arg(1), -1), Dest) Dest = Path Path = file.folder(Path) else break endif endfor if(Dest == "") quit Path = arg(1) ++ "*.* " ++ Dest ++ " /s /rc /yy" file.runwait(0, "path\xxcopy.exe", Path, "", "hide") tc.cd(hwnd, Dest) wait 1 file.delete(Folder) win.postmessage(hwnd, 0x400+51, 540, 0)
Suppose there is the following directory structure:
So, there are some nesting directories containing each of them only one subdirectory. In our example these nesting directories are Folder2-Folder3-Folder4. Script moves all files and folders from the current directory (underlined) to Folder3, to preserve the minimum nesting required, and then removes empty directories. The result would be:
In other words, if in the full path (Folder2\Folder3\Folder4\Folder5 in our case) there are directories containing only one subdirectories, all of them (but two first ones) would be deleted and the full path would be Folder2\Folder3. It could be also said that the script eliminates the redundant nesting.
|Main Page||Total Commander||PowerPro|