home *** CD-ROM | disk | FTP | other *** search
- !!Script
- // Copyright ⌐ 1998 - Modelworks Software
-
- /**
- @Tool: editOpenIn~displays a choose list of the directories
- in the Open In list. Uncheck the items to remove directories
- from the Open In list.
- @EndTool:
- @Summary: editOpenIn~let you remove files from the Open In list
- */
-
- var gRecentFilesMap = getMapFile("RecentFiles");
- var gOutput = getOutput();
-
- function DoCommand(commandID, menuIndex)
- {
- var directoryList = gRecentFilesMap.lookup("OpenInList", null);
- if (directoryList)
- {
- var selectedList = newList();
- var position = directoryList.getHeadPosition();
- while (position && position.valid)
- {
- var path = directoryList.getNext(position);
- selectedList.addTail(true);
- }
-
- var resultList = chooseOptions("Open In List",
- "Edit Open In List", directoryList, selectedList);
-
- if (resultList)
- {
- var directoryPosition = directoryList.getHeadPosition();
- var resultPosition = resultList.getHeadPosition();
- while (directoryPosition.valid && resultPosition.valid)
- {
- var currentPosition = directoryPosition.clone();
- var path = directoryList.getNext(directoryPosition);
- var keep = resultList.getNext(resultPosition);
- if (!keep)
- {
- directoryList.removeAt(currentPosition);
- }
- }
- gRecentFilesMap.forceUpdate();
- }
- }
- }
-
-
- !!/Script
-
-
-