View Book on Open Library.scpt

-- Menu Path: "Item"

tell front document of application "Delicious Library 2"
    repeat with theItem in (get selected media)
        if class of theItem is book and isbn of theItem is not missing value then
            set theISBN to isbn of theItem
            tell application "Safari"
                activate
                open location ("http://openlibrary.org/search?q=" & theISBN)
            end tell
        end if
    end repeat
end tell