Applescript to import NNW smart folder into Yojimbo
Today I modified this script which facilitates Yojimbo importing from NetNewsWire
I’ve set up a smart folder in NetNewsWire that grabs the latest 50 flagged headlines from any feed.
I needed this script because I had a technorati watch feed for dorkbot and I wanted to collect blog mentions to send around. I was just flagging articles that mentioned dorkbot-austin and wanted to export a list of bookmarks.
With this, the workflow is now:
- Quickly scan headlines in NetNewsWire and do CMD-Shift-L to flag interesting content.
- Run this script on the smart folder (this creates a web archive in Yojimbo of each of these articles and removes the flag on the headline in NetNewsWire)
- Over time, spend a few minutes working down the list of archived articles in Yojimbo and tag/delete them further as necessary.
Potential problem: This makes it really easy to procrastinate making decisions on what to read and what to do with what I read. Following this strategy will lead to a large pile of unsorted links which I’ll very likely will never find the time to sort through.
I think DEVONThink does a better job of scanning and grouping incoming pieces of text.
I should probably rewrite this to send flagged content directly to DEVONThink. Then, instead of queueing up a long list of articles to read, I’ll let DEVONThink suggest articles for me to read as I do research. Anything that I think I’d want to read immediately I could tag with “@Read” or something similar.
tell application "NetNewsWire" try set userInput to text returned of (display dialog "Enter Tag:" default answer "untagged") set oldDelims to AppleScript's text item delimiters set AppleScript's text item delimiters to {", ", ","} set h_tags to text items of userInput set AppleScript's text item delimiters to oldDelims if (index of selected tab is not 0) then set tabnum to index of selected tab + 1 set taburls to URLs of tabs set h_URL to (get item tabnum of taburls) set tabtitles to titles of tabs set newItemTitle to (get item tabnum of tabtitles) tell application "Yojimbo" --set newItem to make new bookmark item with properties {name:newItemTitle, location:h_URL} set newItem to make new web archive item with contents h_URL add tags h_tags to newItem set flagged of newItem to true set isFlagged of h to false end tell else if exists selectedSubscription then repeat with h in headlines of selectedSubscription set h_URL to URL of h set h_title to title of h set isFlagged of h to false tell application "Yojimbo" --set newItem to make new bookmark item with properties {name:h_title, location:h_URL} set newItem to make new web archive item with contents h_URL add tags h_tags to newItem set flagged of newItem to true end tell end repeat else error "No headline is selected." end if on error error_message number error_number if the error_number is not -128 then try display alert "NetNewsWire" message error_message as warning on error number error_number if error_number is -1708 then display dialog error_message buttons {"OK"} default button 1 end try end if end try end tell
David Nuñez Newsletter
Join the newsletter to receive the latest updates in your inbox.