home *** CD-ROM | disk | FTP | other *** search
/ PC User 2001 August / APC_Aug2001_CD2.iso / features / web_dev / files / mwjpp516.exe / %MAINDIR% / Tools / Project / newSubpackage.script < prev    next >
Encoding:
Text File  |  2001-06-19  |  1.0 KB  |  43 lines
  1. !!Script
  2. // Copyright ⌐ 1997-1998 - Modelworks Software
  3. // @Modify build 225 cm19981007 - added readOnly detection
  4.  
  5. /**
  6. @Tool: newSubpackage~displays a dialog to let you add a folder 
  7. in the source path of a package. 
  8. @Image: New Subpackage Dialog@newSubpackage_Project.gif 
  9. @EndTool: 
  10. @Summary: newSubpackage~displays a dialog to let you add a folder 
  11. */
  12.  
  13. function DoUpdate(cmdUI) 
  14. {
  15.     var packageList = null;
  16.     var project = getCurrentProject();
  17.     if (project)
  18.     {
  19.         packageList = project.getPackageList()
  20.     }
  21.     cmdUI.enable(project && packageList && packageList.count > 0  && !project.readOnly) // cm19981007
  22.     return true;
  23. }
  24.  
  25. function DoCommand()
  26. {
  27.     var project = getCurrentProject();
  28.     
  29.     if (project)
  30.     {
  31.         var file = chooseNewSubpackage();  
  32.         // Note you can not use the variable name "package"
  33.         // because it is a reserve word in JavaScript
  34.     }
  35.     else
  36.     {
  37.         alert("A project must be open before you can create a subpackage");
  38.     }
  39. }
  40.  
  41.  
  42. !!/Script
  43.