Applescript - ¿cómo puedo seleccionar todas las carpetas * no * en una ventana de vista de lista expandida?

Si todas las carpetas se gastan en la vista de lista, aquí hay dos soluciones.

Primera solución:

Este AppleScript

my deselectAllFolders()

on deselectAllFolders()
    script o
        property sel : {}
    end script
    tell application "Finder"
        set o's sel to selection as alias list
        set tc to count o's sel
        repeat with i from 1 to tc
            if class of item (item i of o's sel) is folder then set item i of o's sel to missing value
        end repeat
        set selection to aliases of o's sel -- select all items without folders
    end tell
    return "" -- to not put all files into the result (it's very slow to show an huge list in the editor )
end deselectAllFolders

Contras:

• Todos los elementos deben seleccionarse antes de ejecutar el script.
• Lentamente en una gran lista de artículos.

Segunda solución:

Este AppleScript

set pScript to "from Foundation import NSFileManager, NSURL, NSDirectoryEnumerationSkipsHiddenFiles, NSURLIsDirectoryKey, NSURLIsPackageKey; from ScriptingBridge import SBApplication
def procFolder(fold):
    p = df.contentsOfDirectoryAtURL_includingPropertiesForKeys_options_error_(fold, [NSURLIsDirectoryKey, NSURLIsPackageKey], NSDirectoryEnumerationSkipsHiddenFiles, None)[0]
    for f in p:
           r=f.getResourceValue_forKey_error_(None, NSURLIsPackageKey, None)
           if r[0] and r[1]:
               allFiles.append(f)
           else:
               r=f.getResourceValue_forKey_error_(None, NSURLIsDirectoryKey, None)
               if r[0] and r[1]:
                     procFolder(f)
               else:
                     allFiles.append(f) 

allFiles = []
df=NSFileManager.defaultManager() 
finderApp = SBApplication.applicationWithBundleIdentifier_(\"com.apple.finder\")
tPath = finderApp.FinderWindows()[0].target().get()
procFolder(NSURL.URLWithString_(tPath.URL()))
finderApp.setSelection_(allFiles)"

do shell script "/usr/bin/python -c " & quoted form of pScript

• No es necesario seleccionar todos los elementos en la vista de lista.
• Rápido (1.5 segundos en 8500 artículos)

Desafortunadamente, Finder no admite la revelación de archivos de esta manera.

El siguiente código establece 'theFiles' a los archivos en el directorio elegido, pero 'reveal' no admite ningún parámetro. Si ya tiene la ventana abierta, selecciona los archivos en la raíz de la carpeta elegida en esa ventana, pero luego abre una ventana para todas las demás carpetas recursivamente.

tell application "Finder"
  set theFiles to get every item of (entire contents of folder (choose folder)) whose kind ≠ "Folder"
  reveal theFiles
end tell

Todavía siento que esto es más un problema XY