close all windows except the front
 

I often find myself with too many OF open windows.

Does anyone know a trick to close all open windows except the front? I know if you hit the small button with the x in the middle (top left of the window) and hold down the option key all windows will close.

Thanks,
Steve

This script should do the trick:

[code]
tell application "OmniFocus"
set mainWindow to front window
set frontID to id of mainWindow
set background to (every window whose id is not frontID)
repeat with thisWindow in background
close thisWindow
end repeat
end tell
[/code]

Shamelessly derived from troyb's script to merge OmniWeb windows!

Thanks so much for taking the time to do this! I'll give it a shot.

Steve

p.s. hey that worked great!!!