-- Downloaded From: http://c-command.com/scripts/eaglefiler/launchbar-import-text
-- Last Modified: 2009-11-06



on handle_string(_string)
    tell application "EagleFiler"
        repeat until (exists library document 1)
            delay 1
        end repeat
        tell library document 1
            if (_string begins with "http://") or (_string begins with "https://") then
                import URLs {_string} tag names my promptForTags()
            else
                import text _string tag names my promptForTags()
            end if
        end tell
    end tell
end handle_string

on open _files 
    tell application "EagleFiler"
        tell library document 1
            import files _files tag names my promptForTags()
        end tell
    end tell
end open

on promptForTags()
    set _promptsForTags to true
    set _tagNames to {"unread"}
    if not _promptsForTags then return _tagNames
    set _title to "EagleFiler Import"
    set _prompt to "Tags (separate multiple tags with spaces):"
    display dialog _prompt default answer "unread" with title _title
    set _tagsString to text returned of the result
    set AppleScript's text item delimiters to " "
    set _tagNames to text items of _tagsString
    return _tagNames
end promptForTags