- Timestamp:
- Jul 29, 2016 4:07:16 PM (7 years ago)
- Location:
- sans/Dev/trunk
- Files:
-
- 3 added
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
sans/Dev/trunk/NCNR_User_Procedures/Common/Installer/NCNR_Install.ipf
r927 r1006 18 18 //InstallNCNRMacros() // run this function when experiment is loaded 19 19 //InstallerPanel() // run this function when experiment is loaded 20 21 // JULY 2016 -- updated for Igor 7 22 // specifically the 64- bit version Extensions folder in the user folder is something new 23 // 24 // 25 // 26 20 27 21 28 // … … 90 97 isMac=1 91 98 endif 92 99 100 //check the 32-bit or 64-bit 101 String igorKindStr = StringByKey("IGORKIND", IgorInfo(0) ) 102 Variable is64Bit = 0 103 if(strsearch(igorKindStr, "64", 0 ) != -1) 104 is64Bit = 1 105 endif 93 106 94 107 String igorPathStr,homePathStr,userPathStr … … 110 123 ////////////////////////////////////////////////////////////////////// 111 124 125 112 126 ////// clean up the Igor Extensions (first the old path -- in the App folder) 113 NewPath /Q/O ExPath, igorPathStr+"Igor Extensions:" 127 String extFolderStr,NCNRExtFolder 128 if(is64Bit) 129 extFolderStr = "Igor Extensions (64-bit):" 130 NCNRExtFolder = "NCNR_Extensions_64bit" 131 else 132 extFolderStr = "Igor Extensions:" 133 NCNRExtFolder = "NCNR_Extensions" 134 endif 135 136 NewPath /Q/O ExPath, igorPathStr+extFolderStr 114 137 PathInfo ExPath 115 138 String extPathStr = S_Path … … 123 146 if(isThere) 124 147 MoveFile/O/P=ExPath tmpStr as homePathStr+"NCNR_Moved_Files:"+tmpStr+timeStamp 125 Print "Move file "+ tmpStr + " from Igor Extensions: "+IsMoveOK(V_flag)148 Print "Move file "+ tmpStr + " from "+extFolderStr+IsMoveOK(V_flag) 126 149 endif 127 150 endfor … … 136 159 if(isThere) 137 160 MoveFolder extPathStr+tmpStr as homePathStr+"NCNR_Moved_Files:NCNR_Moved_Folders:"+tmpStr+timeStamp 138 Print "Move folder "+ tmpStr + " from Igor Extensions: "+IsMoveOK(V_flag)161 Print "Move folder "+ tmpStr + " from "+extFolderStr+IsMoveOK(V_flag) 139 162 endif 140 163 endfor 141 164 142 165 ////// then clean up the Igor Extensions (now look in the User Path, by changing the definition of ExPath) 143 NewPath /Q/O ExPath, userPathStr+ "Igor Extensions:"166 NewPath /Q/O ExPath, userPathStr+extFolderStr 144 167 PathInfo ExPath 145 168 extPathStr = S_Path … … 151 174 if(isThere) 152 175 MoveFile/O/P=ExPath tmpStr as homePathStr+"NCNR_Moved_Files:"+tmpStr+timeStamp 153 Print "Move file "+ tmpStr + " from Igor Extensions: "+IsMoveOK(V_flag)176 Print "Move file "+ tmpStr + " from "+extFolderStr+IsMoveOK(V_flag) 154 177 endif 155 178 endfor … … 162 185 if(isThere) 163 186 MoveFolder extPathStr+tmpStr as homePathStr+"NCNR_Moved_Files:NCNR_Moved_Folders:"+tmpStr+timeStamp 164 Print "Move folder "+ tmpStr + " from Igor Extensions: "+IsMoveOK(V_flag)187 Print "Move folder "+ tmpStr + " from "+extFolderStr+IsMoveOK(V_flag) 165 188 endif 166 189 endfor … … 383 406 // Igor Extensions, platform-specific 384 407 if(isMac) 385 CopyFolder/Z=1 homePathStr+ "NCNR_Extensions:Mac_XOP" as extPathStr+"NCNR_Extensions"408 CopyFolder/Z=1 homePathStr+NCNRExtFolder+":Mac_XOP" as extPathStr+NCNRExtFolder 386 409 else 387 CopyFolder/Z=1 homePathStr+ "NCNR_Extensions:Win_XOP" as extPathStr+"NCNR_Extensions"388 endif 389 Print "*******Copy folder NCNR_Extensions:xxx_XOP into User Special Folder, NO overwrite: "+IsMoveOK(V_flag)410 CopyFolder/Z=1 homePathStr+NCNRExtFolder+":Win_XOP" as extPathStr+NCNRExtFolder 411 endif 412 Print "*******Copy folder "+NCNRExtFolder+":xxx_XOP into User Special Folder, NO overwrite: "+IsMoveOK(V_flag) 390 413 // 391 414
Note: See TracChangeset
for help on using the changeset viewer.