Record All.plist

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
	<key>beforeRunningCommand</key>
	<string>saveModifiedFiles</string>
	<key>command</key>
	<string>cd "${TM_PROJECT_DIRECTORY:=$TM_DIRECTORY}";

"${TM_RUBY:=ruby}" &lt;&lt;'EOF'
output = `CocoaDialog inputbox --title Input --informative-text 'Record Message' --button1 Record --button2 'Abort'`
output = output.split("\n")

# check the button pressed, exit if it wasn't Record
if(output[0] !~ /^1$/)
	exit
end

output = `darcs record -a -m '#{output[1].strip.gsub(/'/, '\\\\1')}'`

puts(output)</string>
	<key>input</key>
	<string>none</string>
	<key>keyEquivalent</key>
	<string>@d</string>
	<key>name</key>
	<string>Record All</string>
	<key>output</key>
	<string>showAsTooltip</string>
	<key>uuid</key>
	<string>1C9B5F32-759D-4B3E-BA91-A83897C48026</string>
</dict>
</plist>