{"id":351,"date":"2011-06-23T14:37:15","date_gmt":"2011-06-23T21:37:15","guid":{"rendered":"http:\/\/10.0.1.201\/?p=351"},"modified":"2011-06-23T14:37:15","modified_gmt":"2011-06-23T21:37:15","slug":"replace-space-with-underscore","status":"publish","type":"post","link":"https:\/\/strawhousepig.net\/wordpress\/2011\/06\/23\/replace-space-with-underscore\/","title":{"rendered":"Replace space with underscore"},"content":{"rendered":"

An AppleScript to replace spaces (‘ ‘) with underscore (‘_’) in names of files selected in the Finder. It does not do folders, but should be easy enough to modify so it can.
\n
\nIt does display a prompt with the file names as a list, so processing a mountain of files may not be ideal since AppleScript dialogs have the unwelcome habit of pushing the top (the only place you can grab an AppleScript dialog) and bottom (where the buttons are) past the edges of the screen when they contain enough text. Although ‘OK’ and ‘Cancel’ can still be activated by return<\/b><\/em> and Command .<\/b><\/em> respectively.<\/p>\n

[UPDATE] Removed some redundant text in repeat routines, and switched to “my text item delimiters”.<\/ins><\/p>\n

(*
\nhttp:\/\/strawhousepig.net\/
\nPortions of this script from:<\/p>\n

Replace Text In Item Names
\nCopyright \u00ef\u00bf\u00bd 2001 Apple Computer, Inc.
\n*)<\/p>\n

tell application \"Finder\" to set the_items to selection
\nset name_list to \"\"
\nrepeat with i in the the_items
\n\tset this_item to i as alias
\n\tset this_info to info for this_item
\n\trepeat 1 times
\n\t\tif folder of this_info is true then
\n\t\t\texit repeat
\n\t\t\t--set this_name to \"(Folder) \" & this_name
\n\t\tend if
\n\t\tset this_name to name of this_info & return
\n\t\tset name_list to name_list & this_name
\n\tend repeat
\nend repeat
\nif name_list is not \"\" then
\n\tdisplay dialog \"Replace spaces with underscores in the following files?\" & return & return & name_list
\nelse
\n\tdisplay dialog \"Please select files first.\"
\n\treturn
\nend if<\/p>\n

repeat with i in the the_items
\n\tset this_item to i as alias
\n\tset this_info to info for this_item
\n\trepeat 1 times
\n\t\tif folder of this_info is true then
\n\t\t\texit repeat
\n\t\tend if
\n\t\tset the current_name to the name of this_info
\n\t\t-- replace target string using delimiters
\n\t\tset my text item delimiters to \" \"
\n\t\tset the text_item_list to every text item of the current_name
\n\t\tset my text item delimiters to \"_\"
\n\t\tset the new_item_name to the text_item_list as string
\n\t\tmy set_item_name(this_item, new_item_name)
\n\tend repeat
\nend repeat<\/p>\n

on set_item_name(this_item, new_item_name)
\n\ttell application \"Finder\"
\n\t\t--activate
\n\t\tset the parent_container_path to (the container of this_item) as text
\n\t\tif not (exists item (the parent_container_path & new_item_name)) then
\n\t\t\ttry
\n\t\t\t\tset the name of this_item to new_item_name
\n\t\t\ton error the error_message number the error_number
\n\t\t\t\tif the error_number is -59 then
\n\t\t\t\t\tset the error_message to \"This name contains improper characters, such as a colon (:).\"
\n\t\t\t\telse --the suggested name is too long
\n\t\t\t\t\tset the error_message to error_message -- \"The name is more than 31 characters long.\"
\n\t\t\t\tend if
\n\t\t\t\t--beep
\n\t\t\t\ttell me to display dialog the error_message default answer new_item_name buttons {\"Cancel\", \"Skip\", \"OK\"} default button 3
\n\t\t\t\tcopy the result as list to {new_item_name, button_pressed}
\n\t\t\t\tif the button_pressed is \"Skip\" then return 0
\n\t\t\t\tmy set_item_name(this_item, new_item_name)
\n\t\t\tend try
\n\t\telse --the name already exists
\n\t\t\t--beep
\n\t\t\ttell me to display dialog \"This name is already taken, please rename.\" default answer new_item_name buttons {\"Cancel\", \"Skip\", \"OK\"} default button 3
\n\t\t\tcopy the result as list to {new_item_name, button_pressed}
\n\t\t\tif the button_pressed is \"Skip\" then return 0
\n\t\t\tmy set_item_name(this_item, new_item_name)
\n\t\tend if
\n\tend tell
\nend set_item_name
\n<\/code><\/p>\n","protected":false},"excerpt":{"rendered":"

An AppleScript to replace spaces (‘ ‘) with underscore (‘_’) in names of files selected in the Finder. It does not do folders, but should be easy enough to modify so it can.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[2],"tags":[10,23,28],"class_list":["post-351","post","type-post","status-publish","format-standard","hentry","category-code","tag-applescript-2","tag-macintosh","tag-os-x"],"_links":{"self":[{"href":"https:\/\/strawhousepig.net\/wordpress\/wp-json\/wp\/v2\/posts\/351","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/strawhousepig.net\/wordpress\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/strawhousepig.net\/wordpress\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/strawhousepig.net\/wordpress\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/strawhousepig.net\/wordpress\/wp-json\/wp\/v2\/comments?post=351"}],"version-history":[{"count":0,"href":"https:\/\/strawhousepig.net\/wordpress\/wp-json\/wp\/v2\/posts\/351\/revisions"}],"wp:attachment":[{"href":"https:\/\/strawhousepig.net\/wordpress\/wp-json\/wp\/v2\/media?parent=351"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/strawhousepig.net\/wordpress\/wp-json\/wp\/v2\/categories?post=351"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/strawhousepig.net\/wordpress\/wp-json\/wp\/v2\/tags?post=351"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}