Better way of doing this

[Jan Erik Moström]

I'm new to OmniOutliner and I have a question: I want to be able to
quickly open different documents that I have in a specific folder. The
recent menu doesn't really work for me so I wrote this AppleScript

property searchFolder : ""

on run
    try
        if searchFolder = "" then
            set y to choose folder
            set searchFolder to y
        end if
    on error
        display dialog "User cancelled operation"
    end try
    showList()
end run

on showList()
    tell application "Finder"
        set dl to the name of every file in searchFolder whose name ends
with "ooutline"
    end tell
    set ol to choose from list dl
    if class of ol = list and ol ‚ {} then
        tell application "OmniOutliner"
            open {alias ((searchFolder as text) & ol as text)}
        end tell
    end if
end showList

It works but what I would like to know is if there is some way of
listing the files directly in OmniOutliner instead? Like a menu, a
floating palette or something similar.

                    jem
-- 
Jan Erik Moström   jem at mostrom.pp.se    www.mostrom.pp.se