Added text version of applescripts
This commit is contained in:
41
tests/dump_photo_info.applescript
Normal file
41
tests/dump_photo_info.applescript
Normal file
@@ -0,0 +1,41 @@
|
||||
-- Dumps UUID and other info about every photo in Photos.app to a tet file (see theFile below)
|
||||
-- Use output of this script with check_uuid.py to help with debugging differences in Photos and osxphoto
|
||||
|
||||
tell application "Photos"
|
||||
activate
|
||||
|
||||
set theDelimiter to ";"
|
||||
set theBackup to AppleScript's text item delimiters
|
||||
|
||||
-- Set the new delimiter
|
||||
set AppleScript's text item delimiters to theDelimiter
|
||||
|
||||
set theFile to (((path to desktop folder) as string) & "photoslib1.txt")
|
||||
set theOpenedFile to open for access file theFile with write permission
|
||||
|
||||
set results to selection
|
||||
repeat with _item in results
|
||||
|
||||
|
||||
set _keywords to keywords of _item
|
||||
if _keywords is not {} then
|
||||
_keywords = (_keywords as text)
|
||||
else
|
||||
_keywords = "none"
|
||||
end if
|
||||
|
||||
set _str to (((((id of _item) as text) & ", " & (filename of _item) as text) & ", " & _keywords & ", " & (name of _item) as text) & ", " & (description of _item) as text) & "
|
||||
"
|
||||
-- display dialog _str
|
||||
write _str to theOpenedFile starting at eof
|
||||
|
||||
-- writeTextToFile(_str, theFile, false)
|
||||
end repeat
|
||||
|
||||
-- Restore the original delimiter
|
||||
set AppleScript's text item delimiters to theBackup
|
||||
close access theOpenedFile
|
||||
|
||||
end tell
|
||||
|
||||
|
||||
34
tests/get_photo_info.applescript
Normal file
34
tests/get_photo_info.applescript
Normal file
@@ -0,0 +1,34 @@
|
||||
-- Displays UUID and other info about selected photos
|
||||
-- Useful for debugging with osxphotos
|
||||
|
||||
tell application "Photos"
|
||||
activate
|
||||
|
||||
set theDelimiter to ";"
|
||||
set theBackup to AppleScript's text item delimiters
|
||||
|
||||
-- Set the new delimiter
|
||||
set AppleScript's text item delimiters to theDelimiter
|
||||
|
||||
set theResults to selection
|
||||
repeat with theItem in theResults
|
||||
|
||||
|
||||
set theKeywords to keywords of theItem
|
||||
if theKeywords is not {} then
|
||||
theKeywords = (theKeywords as text)
|
||||
else
|
||||
theKeywords = "none"
|
||||
end if
|
||||
|
||||
set theStr to (((((id of theItem) as text) & ", " & (filename of theItem) as text) & ", " & theKeywords & ", " & (name of theItem) as text) & ", " & (description of theItem) as text) & "
|
||||
"
|
||||
display dialog theStr
|
||||
|
||||
end repeat
|
||||
|
||||
set AppleScript's text item delimiters to theBackup
|
||||
|
||||
end tell
|
||||
|
||||
|
||||
Reference in New Issue
Block a user