• Open Menu Close Menu
  • Apple
  • Shopping Bag
  • Apple
  • Mac
  • iPad
  • iPhone
  • Watch
  • TV
  • Music
  • Support
  • Search apple.com
  • Shopping Bag

Lists

Open Menu Close Menu
  • Terms and Conditions
  • Lists hosted on this site
  • Email the Postmaster
  • Tips for posting to public mailing lists
Re: El Capitan Wrecks my Desktop Sweeper Script
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: El Capitan Wrecks my Desktop Sweeper Script


  • Subject: Re: El Capitan Wrecks my Desktop Sweeper Script
  • From: Christopher Stone <email@hidden>
  • Date: Fri, 02 Oct 2015 03:00:56 -0500

On Oct 02, 2015, at 02:40, Christopher Stone <email@hidden> wrote:
Well, Hell!  El Capitan wrecks my long-used Desktop Sweeper Script.
______________________________________________________________________

Hey Folks,

Hmm... The list apparently doesn't like messages over 128K.

Anyway – playing around with the problem...

This runs in ~ 0.3 seconds, although I'm not moving any files as yet.

--
Best Regards,
Chris

-------------------------------------------------------------------------------------------

tell application "System Events"
  set theDesktop to disk item "~/Desktop/"
  
  set folderList to POSIX path of folders of theDesktop
  set aliasList to POSIX path of disk items of theDesktop whose file type is "osas"
  
  set archiveList to {}
  set bbeditWorksheetList to {}
  set diskImageList to {}
  set flashVidList to {}
  set imageList to {}
  set movieList to {}
  set rtfList to {}
  set scriptList to {}
  set textClippingList to {}
  set textFileList to {}
  set webArchiveList to {}
  set webBookmarkList to {}
  
  set archiveList to archiveList & (get POSIX path of disk items of theDesktop whose name extension is "sit")
  set archiveList to archiveList & (get POSIX path of disk items of theDesktop whose name extension is "zip")
  set bbeditWorksheetList to bbeditWorksheetList & (get POSIX path of disk items of theDesktop whose name extension is "worksheet")
  set diskImageList to diskImageList & (get POSIX path of disk items of theDesktop whose name extension is "dmg")
  set flashVidList to flashVidList & (get POSIX path of disk items of theDesktop whose name extension is "flv")
  set imageList to imageList & (get POSIX path of disk items of theDesktop whose name extension is "gif")
  set imageList to imageList & (get POSIX path of disk items of theDesktop whose name extension is "jpg")
  set imageList to imageList & (get POSIX path of disk items of theDesktop whose name extension is "png")
  set movieList to movieList & (get POSIX path of disk items of theDesktop whose name extension is "mov")
  set movieList to movieList & (get POSIX path of disk items of theDesktop whose name extension is "mp4")
  set rtfList to rtfList & (get POSIX path of disk items of theDesktop whose name extension is "rtf")
  set rtfList to rtfList & (get POSIX path of disk items of theDesktop whose name extension is "rtfd")
  set scriptList to scriptList & (get POSIX path of disk items of theDesktop whose name extension is "scpt")
  set scriptList to scriptList & (get POSIX path of disk items of theDesktop whose name extension is "scptd")
  set textClippingList to textClippingList & (get POSIX path of disk items of theDesktop whose name extension is "textClipping")
  set textFileList to textFileList & (get POSIX path of disk items of theDesktop whose name extension is "txt")
  set webArchiveList to webArchiveList & (get POSIX path of disk items of theDesktop whose name extension is "webarchive")
  set webBookmarkList to webBookmarkList & (get POSIX path of disk items of theDesktop whose name extension is "webbookmark")
  set webBookmarkList to webBookmarkList & (get POSIX path of disk items of theDesktop whose name extension is "webloc")
  
end tell

repeat with idx1 in {aliasList, folderList, archiveList, bbeditWorksheetList, diskImageList, flashVidList, imageList, movieList, rtfList, scriptList, textClippingList, textFileList, webArchiveList, webBookmarkList}
  
  repeat with idx2 in idx1
    set contents of idx2 to alias POSIX file idx2
  end repeat
  
end repeat

# Obviously this just collates items to be moved and doesn't yet contain any code to actually move the files.

-------------------------------------------------------------------------------------------

 _______________________________________________
Do not post admin requests to the list. They will be ignored.
AppleScript-Users mailing list      (email@hidden)
Help/Unsubscribe/Update your Subscription:
Archives: http://lists.apple.com/archives/applescript-users

This email sent to email@hidden

  • Follow-Ups:
    • Re: El Capitan Wrecks my Desktop Sweeper Script
      • From: Christopher Stone <email@hidden>
References: 
 >El Capitan Wrecks my Desktop Sweeper Script (From: Christopher Stone <email@hidden>)

  • Prev by Date: El Capitan Wrecks my Desktop Sweeper Script
  • Next by Date: Re: El Capitan Wrecks my Desktop Sweeper Script
  • Previous by thread: El Capitan Wrecks my Desktop Sweeper Script
  • Next by thread: Re: El Capitan Wrecks my Desktop Sweeper Script
  • Index(es):
    • Date
    • Thread