simple applescript?

[Chipp Walters]

Hi all. Need a bit of help here...why doesn't this work?

on mouseUp
   answer file ""
   if it is empty then exit to top
   put it into pPDFpath
   replace "/" with ":" in pPDFpath
   if char 1 of pPDFpath is ":" then delete char 1 of pPDFpath
   put "tell application " &quote& "Finder" & quote & cr into tScript
   put "set the file type of " &quote& pPDFpath &quote& \
         " to " &quote& "PDF " &quote& cr after tScript
   put "end tell" after tScript
   do tScript as Applescript
   put the result into sError
end mouseUp