Comment lines in Applescript Files

This perl script is a modified version of the comment/uncoment script distributed with Xcode. It adds the ability to automatically detect an applescript file as the current document and insert applescript comment characters "--" instead of the default "//" C file comment characters.

Usage...

To install this script, navigate to the location...
"/Library/Application Support/Apple/Developer Tools/Scripts/10-User Scripts/30-Comments/"
Make a backup copy of the original version of the script 10-un_commentLines.pl, and store it in a safe location (outside of the current directory) in case you want to revert to the original copy. Then paste the code below into the new file, and restart Xcode. To run the script, select "Comments > Un/Comment Selection" from the Xcode scripts menu. When run on Applescript files, it should comment/uncomment any selected lines using the applescript comment characters "--".

Code...

Notes...

This script uses string comparison to test whether or not the current file is an applescript. On the odd chance that you have used ".applescript" or ".scpt" somewhere in the name of a file other than an applescript file, this will probably cause the incorrect type of comment to be added to the file.