362 "/ (dllSourceDir / dllRelativePath) exists |
362 "/ (dllSourceDir / dllRelativePath) exists |
363 dllRelativeSourcePathes := Array with:(objDirSource,'\', libraryName, '.dll'). |
363 dllRelativeSourcePathes := Array with:(objDirSource,'\', libraryName, '.dll'). |
364 dllRelativeDestPathes := Array with:(objDirDest,'\', libraryName, '.dll'). |
364 dllRelativeDestPathes := Array with:(objDirDest,'\', libraryName, '.dll'). |
365 ] ifFalse:[ |
365 ] ifFalse:[ |
366 dllRelativeSourcePathes := Array with:(libraryName,'.so'). |
366 dllRelativeSourcePathes := Array with:(libraryName,'.so'). |
|
367 dllRelativeDestPathes := Array with:(libraryName, '.so'). |
367 (packageModule = 'stx' and:[packageDirectory = 'libview']) ifTrue:[ |
368 (packageModule = 'stx' and:[packageDirectory = 'libview']) ifTrue:[ |
368 dllRelativeSourcePathes := dllRelativeSourcePathes, #('XWorkstation.so' 'GLXWorkstation.so'). |
369 dllRelativeSourcePathes := dllRelativeSourcePathes copyWith:('XWorkstation.so'). |
|
370 dllRelativeDestPathes := dllRelativeDestPathes copyWith:'XWorkstation.so'. |
|
371 dllRelativeSourcePathes := dllRelativeSourcePathes copyWith:('GLXWorkstation.so'). |
|
372 dllRelativeDestPathes := dllRelativeDestPathes copyWith:'GLXWorkstation.so'. |
369 ]. |
373 ]. |
370 ]. |
374 ]. |
371 dllRelativeSourcePathes with:dllRelativeDestPathes do:[:dllRelativeSourcePath :dllRelativeDestPath| |
375 dllRelativeSourcePathes with:dllRelativeDestPathes do:[:dllRelativeSourcePath :dllRelativeDestPath| |
372 |source dest| |
376 |source dest| |
373 |
377 |
374 source := dllSourceDir / dllRelativeSourcePath. |
378 source := dllSourceDir / dllRelativeSourcePath. |
375 dest := packageTargetDir / dllRelativeDestPath. |
379 source exists ifFalse:[ |
376 (dest exists not |
380 self activityNotification:' skip missing file: ',source pathName. |
377 or:[source fileSize ~= dest fileSize |
381 ] ifTrue:[ |
378 or:[source modificationTime >= dest modificationTime |
382 dest := packageTargetDir / dllRelativeDestPath. |
379 "/ or:[ ((dllSourceDir / dllRelativePath) sameContentsAs:(packageTargetDir / dllRelativePath)) not ] |
383 (dest exists not |
380 ]]) ifTrue:[ |
384 or:[source fileSize ~= dest fileSize |
381 Transcript showCR:'updating ',dllRelativeDestPath. |
385 or:[source modificationTime >= dest modificationTime |
382 dest directory recursiveMakeDirectory. |
386 "/ or:[ ((dllSourceDir / dllRelativePath) sameContentsAs:(packageTargetDir / dllRelativePath)) not ] |
383 source copyTo:dest. |
387 ]]) ifTrue:[ |
384 ]. |
388 Transcript showCR:'updating ',dllRelativeDestPath. |
|
389 dest directory recursiveMakeDirectory. |
|
390 source copyTo:dest. |
|
391 ]. |
|
392 ] |
385 ]. |
393 ]. |
386 ]. |
394 ]. |
387 |
395 |
388 "Modified: / 06-09-2012 / 16:19:29 / cg" |
396 "Modified: / 06-09-2012 / 16:19:29 / cg" |
389 ! |
397 ! |