I must be doing something wrong, but have not been able to figure it out.
Would like to be able to clip from within DEVONthink using the ubiquitous OF3 clipping shortcut. DEVONthink has a script to create an OF task with a link (in the notes) to DT selected item, but I would rather use the universal Clippings shortcut and the quick entry interface that it pulls up.
The OF3 clippings shortcut is setup already in Keyboard preferences and works in most of the applications (Safari, mail, text selections and others). However, it does not work in DEVONthink… My current keyboard shortcut is cmd-opt-O. In DEVONthink this keyboard acts as if I just pressed cmd-O. I changed the clipping shortcut (reluctantly) but even it just does not work in DEVOnthink. May be it is not designed to.
If you have any ideas to address this that would be great. Thank you!
So went looking for scripts and found two that I combined and created this here. Sharing in case this is useful to anybody else.
I plan to use this script via a Keyboard Maestro trigger.
Improvements and criticism welcome. :)
# Main script sourced from https://discourse.devontechnologies.com/t/omnifocus-quick-entry-task-with-link-to-record/16985
try
tell application "DEVONthink 3"
set theDatabase to current database
set theSelection to selection
if theSelection is {} then error "Please select something"
set theURL to the reference URL of item 1 of theSelection
set theName to the name of item 1 of theSelection
end tell
tell application "OmniFocus"
tell quick entry
open
set NewTask to make new inbox task
set the note of NewTask to theURL
set the name of NewTask to theName
# activate
open
end tell
end tell
end try
# this portion to display the link in notes and to select the task name in the interface
# this inspired from https://discourse-test.omnigroup.com/t/how-to-get-focus-on-quick-entry-when-using-applescript-quick-entry/30330/4
delay 1
tell application "System Events"
# https://eastmanreference.com/complete-list-of-applescript-key-codes
key code 125 # down arrow
key code 39 using {command down} # 39 is apostrophe
delay 0.2
key code 126 # up arrow
delay 0.2
keystroke "a" using {command down}
# key code 48 using {shift down} # tab
# key code 48 using {shift down} # tab
end tell