I have a number of sites bookmarked in a Devonthink folder and I would like to email them, but when I select and copy the links and then try to paste in Gmail, all that gets pasted is the page titles and not the URLs. Is there a way to do this other than each link separately?
tell application "DEVONthink Pro"
set theSelection to the selection
set theLinks to ""
repeat with theRecord in theSelection
set theLinks to theLinks & (URL of theRecord) & return
end repeat
set the clipboard to theLinks
end tell