Applescript to get file name without extension
===

I have an applescript where the user will pick one file and i need to get the name of that file minus the extension.

I found a post on a different site that said this would work:

    tell application "Finder"
        set short_name to name of selected_file
    end tell

But it returns the extensions as well. How can I get just the name of the file?