ver 2010.02 → 2010.08

data/config/commands/Apache.rb

@@ -0,0 +1,98 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: "apachectl configtest",
+  input: "none",
+  keyEquivalent: "@r",
+  name: "Config Test",
+  output: "showAsTooltip",
+  scope: "source.apache-config",
+  uuid: "46DBB57A-D7F8-4049-9BE8-4ACABFF5F056"},
+ {beforeRunningCommand: "nop",
+  command: "apache_doc.rb",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "^h",
+  name: "Documentation for Word / Selection",
+  output: "showAsHTML",
+  scope: "source.apache-config",
+  uuid: "A7A95E10-D9F9-4519-9538-2C95C8CB0298"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -rjcode -Ku\n\nrequire \"\#{ENV['TM_BUNDLE_SUPPORT']}/lib/apache_ctl.rb\"\n\nApacheCTL.new.graceful",
+  input: "none",
+  keyEquivalent: "@r",
+  name: "Graceful Restart",
+  output: "discard",
+  scope: "source.apache-config",
+  uuid: "A33BD582-D5BB-4C5B-A14C-5E47A90B01E3"},
+ {beforeRunningCommand: "nop",
+  command: 
+   ". \"$TM_SUPPORT_PATH/lib/webpreview.sh\"\nhtml_header \"Apache HTTP Server Bundle Help\" \"Apache\"\n\n\"$TM_SUPPORT_PATH/lib/markdown_to_help.rb\" <<'EOF'\n# Installation\n\nThe Apache HTTP Server is installed by default on OS X and can be enabled here \"Sytem Preferences &#x2192; Sharing &#x2192; Web Sharing\". \n\nIf you would like to install it manually then the most recent version of Apache can be downloaded [here](http://httpd.apache.org/download.cgi).\n\n# Configuration Options\n\nThese environment variables allow you to define or customise the behavior of certain commands. For help on setting them please see [TextMate help](?environment_variables).\n\n*  `$TM_APACHE_DIRECTORY`  \n\nIf you have installed your own version of Apache you can set this variable to allow TextMate to use it rather than the default.\nFor example if you installed it via MacPorts then set it to `/opt/local/apache2`.\n\n*  `TM_APACHE_ACCESS_LOG`  \n\nThe path to the access log to open when running the _Tail Access Log_ command. This is optional and will use apache's default when not defined.  \n\n*  `TM_APACHE_ERROR_LOG`  \n\nThe path to the error log to open when running the _Tail Error Log_ command. This is optional and will use apache's default when not defined.  \n\n\n* `TM_APACHE_MANUAL_URI`\n\nCurrently for Leopard users only. If you have installed your own version of Apache HTTP Server, you can set this variable to the location of its manual. It is recommended that this is accessible via the server itself, using a http prefix ie `http://localhost/manual`. If you use a file path ie `/Library/WebServer/share/httpd/manual` the documenation command will open the inital documentation page but any hyperlinks within will fail. If the manual directory is not located the _Documentation for Word/Selection_ command will fall back to the [httpd.apache.org](http://httpd.apache.org/docs/2.2) website using the documentation for Apache 2.2.  \n\nEOF\n\nhtml_footer",
+  input: "none",
+  name: "Help",
+  output: "showAsHTML",
+  scope: "source.apache-config",
+  uuid: "5B7DE766-BAA9-44B1-B9AD-6BE331E29A03"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -wKU\n\nSUPPORT = ENV['TM_SUPPORT_PATH']\n\nrequire SUPPORT + '/lib/escape'\nrequire SUPPORT + '/lib/exit_codes'\nrequire SUPPORT + '/lib/osx/plist'\n\ndef find_apache\n    return [ ENV['TM_APACHE_DIRECTORY'].to_s, \n             \"/etc/apache2\", \n             \"/private/etc/httpd\" ].find { |path| File.directory? path }\nend\n\n#Search the path for any filename ending with .conf\ndef search_for_conf path\n    confs = []    \n    search_path = find_apache.to_s + path    \n    Dir.open( search_path ).each do |file|    \n        if file.to_s =~ /\\.conf$/\n            menu_item = { 'title' => File.basename(file), 'path' => search_path + \"/\" + file.to_s }\n            confs.push(menu_item)\n        end\n    end if File.exists?( search_path )\n    confs.push( { 'title' => \"-\" } ) if !confs.empty?\n    return confs\nend\n\nconf_files = search_for_conf( \"\" ) +\n             search_for_conf( \"/users\" ) +\n             search_for_conf( \"/extra\" ) + \n             search_for_conf( \"/other\" )\n\nconf_files.pop()\n\nTextMate.exit_show_tool_tip( \"No .conf files found \") if conf_files.empty?\n\nplist = { 'menuItems' => conf_files }.to_plist\nres = OSX::PropertyList::load(`\"$DIALOG\" -up \#{e_sh plist}`)\n\nTextMate.exit_discard() unless res.has_key? 'selectedMenuItem'\n\n`open -a TextMate \#{res['selectedMenuItem']['path']}`\n",
+  input: "none",
+  keyEquivalent: "@C",
+  name: "Open Config…",
+  output: "discard",
+  scope: "source.apache-config",
+  uuid: "0BB34044-0A2C-4D11-A2DE-30107D622ECF"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\nrequire ENV['TM_SUPPORT_PATH'] + '/lib/exit_codes'\nrequire ENV['TM_BUNDLE_SUPPORT'] + '/lib/apache_mate'\n\ninclude = STDIN.read.strip\n\nTextMate.exit_show_tool_tip( \"Include line not recognised.\" ) if include.empty?\n\ninclude_path = include.sub( \"Include \", \"\" ).sub( \"*.conf\", \"\" )\n\nunless include_path =~ /^\\//\n\tinclude_path = find_server_root + \"/\" + include_path\nend\n\t\nif File.exist?(include_path)\n   `open -a TextMate \"\#{include_path}\"`\nelse\n    TextMate.exit_show_tool_tip( \"Include file could not be located.\" )\nend\n",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "@D",
+  name: "Open Include",
+  output: "discard",
+  scope: "source.include.apache-config",
+  uuid: "19821FE1-709A-4B9D-B51C-68DBF8C2A93F"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -rjcode -Ku\n\nrequire \"\#{ENV['TM_BUNDLE_SUPPORT']}/lib/apache_ctl.rb\"\n\nApacheCTL.new.restart",
+  input: "none",
+  keyEquivalent: "@r",
+  name: "Restart",
+  output: "discard",
+  scope: "source.apache-config",
+  uuid: "33CB105E-A303-49CC-8F69-9F832D6CD8F4"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -rjcode -Ku\n\nrequire \"\#{ENV['TM_BUNDLE_SUPPORT']}/lib/apache_ctl.rb\"\n\nApacheCTL.new.start",
+  input: "none",
+  keyEquivalent: "@r",
+  name: "Start",
+  output: "discard",
+  scope: "source.apache-config",
+  uuid: "CB5FA82C-1287-4312-9407-E695AF16D966"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -rjcode -Ku\n\nrequire \"\#{ENV['TM_BUNDLE_SUPPORT']}/lib/apache_ctl.rb\"\n\nApacheCTL.new.stop",
+  input: "none",
+  keyEquivalent: "@r",
+  name: "Stop",
+  output: "discard",
+  scope: "source.apache-config",
+  uuid: "F86D90AC-AF81-48A7-9E04-BA4AA95668B1"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "TIGER_ACCESS_LOG=\"/var/log/httpd/access_log\"\nLEOPARD_ACCESS_LOG=\"/var/log/apache2/access_log\"\n\nif [[ \"$TM_APACHE_ACCESS_LOG\" == \"\" ]]; then\n\n\tif [[ -f \"$LEOPARD_ACCESS_LOG\" ]]; then\n\n\t\tTM_APACHE_ACCESS_LOG=\"$LEOPARD_ACCESS_LOG\"\n\n\telse\n\n\t\tTM_APACHE_ACCESS_LOG=\"$TIGER_ACCESS_LOG\"\n\n\tfi\nfi\n\nif [[ -f \"$TM_APACHE_ACCESS_LOG\" ]]; then\n\n\t#tailLog \"$TM_APACHE_ACCESS_LOG\" \"httpd Access Log\"\n\tosascript \"$TM_BUNDLE_SUPPORT/lib/tail_log.applescript\" \"$TM_APACHE_ACCESS_LOG\" \"httpd Access Log\" >/dev/null;\n\nelse\n\n\texit_show_tool_tip \"http Access Log not located.\"\n\nfi",
+  input: "none",
+  name: "Tail Access Log",
+  output: "discard",
+  scope: "source.apache-config",
+  uuid: "A7AB0414-104A-4128-B16E-72094A1DD5EB"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "TIGER_ERROR_LOG=\"/var/log/httpd/error_log\"\nLEOPARD_ERROR_LOG=\"/var/log/apache2/error_log\"\n\nif [[ \"$TM_APACHE_ERROR_LOG\" == \"\" ]]; then\n\n\tif [[ -f \"$LEOPARD_ERROR_LOG\" ]]; then\n\n\t\tTM_APACHE_ERROR_LOG=\"$LEOPARD_ERROR_LOG\"\n\n\telse\n\n\t\tTM_APACHE_ERROR_LOG=\"$TIGER_ERROR_LOG\"\n\n\tfi\nfi\n\nif [[ -f \"$TM_APACHE_ERROR_LOG\" ]]; then\n\n\t#tailLog \"$TM_APACHE_ERROR_LOG\" \"httpd Error Log\"\n\tosascript \"$TM_BUNDLE_SUPPORT/lib/tail_log.applescript\" \"$TM_APACHE_ERROR_LOG\" \"httpd Error Log\" >/dev/null;\n\nelse\n\n\texit_show_tool_tip \"http Access Log not located.\"\n\nfi\n",
+  input: "none",
+  name: "Tail Error Log",
+  output: "discard",
+  scope: "source.apache-config",
+  uuid: "9460A02A-EC2A-4A03-9F99-21201D7B7988"}]

data/config/commands/AppleScript.rb

@@ -0,0 +1,169 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\n# Use ps to test for Help Viewer, because if we try\n# to use osascript, then it will open Help Viewer\n# before the test, during script compilation.\n\nif ps -xc|grep -sq 'Help Viewer$'; then\n\tosascript -e 'tell application \"Help Viewer\" to open \"file:///\"'\nfi\nosascript <<-APPLESCRIPT\n\ttell app \"Help Viewer\"\n\t    handle url \"file:///Library/Documentation/Help/AppleScript.help/Contents/Resources/English.lproj/AppleScript.html\"\n\t    activate\n\tend tell\t\nAPPLESCRIPT",
+  fallbackInput: "scope",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "AppleScript Help",
+  output: "discard",
+  scope: "source.applescript",
+  uuid: "2061AB22-C557-4C68-919E-9A8815577987"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\n# If there is a local copy of the Applescript\n# documentation, open it.  Otherwise, use the\n# online copy.\n\nif [ -d \"/Developer/ADC Reference Library/documentation/AppleScript/Conceptual/AppleScriptLangGuide/\" ]; then\n\topen \"file:///Developer/ADC%20Reference%20Library/documentation/AppleScript/Conceptual/AppleScriptLangGuide/index.html\"\nelse\n\topen \"http://developer.apple.com/documentation/AppleScript/Conceptual/AppleScriptLangGuide/\"\nfi\n",
+  fallbackInput: "scope",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "AppleScript Language Guide",
+  output: "discard",
+  scope: "source.applescript",
+  uuid: "C744043F-79AE-47D7-9E7A-F476F44437AC"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\n# The AppleScript Reference Library at the Apple Developer Connection.\n\nopen \"https://developer.apple.com/referencelibrary/ScriptingAutomation/idxAppleScript-date.html\"\n",
+  fallbackInput: "scope",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "AppleScript Reference Library",
+  output: "discard",
+  scope: "source.applescript",
+  uuid: "1A8892FB-D466-492D-A35C-DFF2C6168174"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\n# The AppleScript Release Notes at apple.com\n\nopen \"http://developer.apple.com/releasenotes/AppleScript/RN-AppleScript/\"\n",
+  fallbackInput: "scope",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "AppleScript Release Notes",
+  output: "discard",
+  scope: "source.applescript",
+  uuid: "E26E1CA5-D173-48A3-853C-D9E962550F8E"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\n# A list of useful applescript resources at apple.com\n\nopen \"http://developer.apple.com/applescript/\"\n",
+  fallbackInput: "scope",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "AppleScript Resources",
+  output: "discard",
+  scope: "source.applescript",
+  uuid: "023F99B6-3F0B-4249-96E8-39CF824F1733"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\n# a list of all built-in terms, their types, and the associated event codes.\n\nopen \"http://developer.apple.com/releasenotes/AppleScript/ASTerminology_AppleEventCodes/TermsAndCodes.html\"\n",
+  fallbackInput: "scope",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "AppleScript Terminology / Event Codes",
+  output: "discard",
+  scope: "source.applescript",
+  uuid: "0823F607-CC45-4AB7-A869-36DF8ED662A7"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\nrequire \"tempfile\"\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/tm/executor\"\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/tm/save_current_document\"\n\nTextMate.save_current_document\nTextMate::Executor.make_project_master_current_document\n\nerror_fd = nil\ndocument = File.read(ENV[\"TM_FILEPATH\"])\n\nTempfile::open('tm_osacompile') do |tmpfile|\n  TextMate::Executor.run(ENV[\"TM_OSACOMPILE\"] || \"osacompile\", \"-o\", tmpfile.path, ENV[\"TM_FILEPATH\"], :verb => \"Compiling\", :use_hashbang => false, :version_args => [\"-o\", tmpfile.path, \"-e\", \"nil\"]) do |str, type|\n    error_fd ||= IO.for_fd(ENV[\"TM_ERROR_FD\"].to_i)\n    case type\n    when :err\n      if str =~ /^([^\\:]+):(\\d+):(\\d+): (.*?): (.*) \\((-?\\d+)\\)$/ then\n        filepath, start,  stop, err, msg, status = $1, $2.to_i, $3.to_i, $4, $5, $6\n    \n        err = err.gsub(/\\b\\w(?=\\w{3,})/) { |m| m.upcase }\n      \n        error_fd << \"<div id=\\\"exception_report\\\" class=\\\"framed\\\">\\n\"\n        error_fd << \"<p id=\\\"exception\\\"><strong>\#{htmlize err}</strong>: \#{htmlize msg}</p>\\n\"\n    \n        from = document[0..start].rindex(/^/)\n        to = start + document[start..-1].index(/$/)\n        src =  document[from...to]\n    \n        line = document[0...start].count(\"\\n\") + 1\n        column = start - from\n    \n        link = \"txmt://open?line=\#{line}&column=\#{column}\"\n        error_fd << \"<pre>\#{src}\\n\"\n        error_fd << \"\#{' ' * (column)}↑</pre>\"\n        error_fd <<  \"<blockquote><a href=\\\"\#{link}\\\">line \#{line}, column \#{column}</a> in \#{ENV['TM_DISPLAYNAME']}\\n\"\n    \n        error_fd << \"<p>Error \#{status}.</p>\\n\"\n        error_fd << \"</div>\\n\"\n      \n        error_fd.flush\n        \"\"\n      elsif str =~ /^([^\\:]+):(\\d+): (.*) \\((-?\\d+)\\)$/ then\n        filepath, line, msg, status = $1, $2.to_i, $3, $4\n    \n        error_fd << \"<div id=\\\"exception_report\\\" class=\\\"framed\\\">\\n\"\n        error_fd << \"<p id=\\\"exception\\\"><strong>Error</strong>: \#{htmlize msg}</p>\\n\"\n    \n        src =  document.split(/\\n/)[line - 1]\n    \n        link = \"txmt://open?line=\#{line}\"\n        error_fd << \"<pre>\#{src}</pre>\"\n        error_fd <<  \"<blockquote><a href=\\\"\#{link}\\\">line \#{line}</a> in \#{ENV['TM_DISPLAYNAME']}\\n\"\n    \n        error_fd << \"<p>Error \#{status}.</p>\\n\"\n        error_fd << \"</div>\\n\"\n      \n        error_fd.flush\n        \"\"\n      else\n        \"<span class=\\\"err\\\" style=\\\"color:red;\\\">\#{htmlize(str)}</span><br/>\"\n      end\n    when :out\n      htmlize(str)\n    end\n  end\nend\n",
+  input: "document",
+  keyEquivalent: "@b",
+  name: "Compile",
+  output: "showAsHTML",
+  scope: "source.applescript",
+  uuid: "FAA71813-1CC3-45BC-BDC4-EE388D80746C"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\ncontent () {\n\ticonv -cs -f utf-8 -t macroman//TRANSLIT | perl -pe 's/[\"\\\\]/\\\\$&/g'\n}\n\nosascript <<-APPLESCRIPT\n\ttell application \"Script Editor\"\n\t    activate\n\t    set theDocument to make new document\n\t    tell theDocument\n\t        set contents of selection to \"$(content)\"\n\t        try\n\t            check syntax\n\t            compile\n\t        on error error_message number the error_number\n\t            display dialog \"Error: \" & the error_number & \". \" & the error_message buttons {\"OK\"} default button 1\n\t        end try\n\t    end tell\n\tend tell\nAPPLESCRIPT",
+  input: "selection",
+  keyEquivalent: "~@b",
+  name: "Compile in Script Editor",
+  output: "showAsTooltip",
+  scope: "source.applescript",
+  uuid: "E3DD341F-94E6-460C-8EDA-D1184B67866F"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\nif sed -n \"$((TM_LINE_NUMBER-1))p\" | grep -sq '¬$'; then\n\techo -ne '¬\\n'\nelse\n\techo -ne '¬\\n\\t'\nfi\n",
+  input: "document",
+  keyEquivalent: "",
+  name: "Continue Line (¬)",
+  output: "insertAsSnippet",
+  scope: "source.applescript",
+  uuid: "9755F5E9-3919-4E82-AAAD-9ECB64FD718A"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -KA -ruri\n\nsrc = 'applescript://com.apple.scripteditor?action=new&script='\nsrc << URI.encode(STDIN.read)\n\nopen('|pbcopy', 'w') { |io| io << src }\n\nprint \"The URL encoded AppleScript was copied to the clipboard\"\n",
+  fallbackInput: "document",
+  input: "selection",
+  keyEquivalent: "^@C",
+  name: "Copy URL Encoded Script",
+  output: "showAsTooltip",
+  scope: "source.applescript",
+  uuid: "565860C4-A665-4C64-81B0-CA7848B181A2"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\nread appname\nosascript <<-APPLESCRIPT\n\ttell app \"Script Editor\"\n\t    launch\n\t    activate\n\t    open path to application ${appname}\n\tend tell\nAPPLESCRIPT\n",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "^h",
+  name: "Documentation for Application",
+  output: "discard",
+  scope: "string.quoted.double.application-name.applescript",
+  uuid: "2263B3B6-8D09-4B98-B056-3DF129226C78"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -wKU\n\ndef end_what?\n  ENV[\"TM_SCOPE\"].split.reverse_each do |scope|\n    case scope\n    when /^meta\\.function\\./\n      return 'end'\n    when /^meta\\.block\\.(\\w+)\\./\n      return \"end \#{$1}\"\n    end\n  end\nend\n\nputs end_what?\n",
+  input: "none",
+  keyEquivalent: "~@.",
+  name: "End Block",
+  output: "afterSelectedText",
+  scope: "source.applescript meta.block, source.applescript meta.function",
+  uuid: "99F1A4C2-2156-4F24-902C-0F651B293ECE"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\n# A list of useful AppleScript Resources at\n# macosxautomation.com\n\n# open \"http://www.macosxautomation.com/applescript/\"\n",
+  fallbackInput: "scope",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "Mac OS X Automation Resources",
+  output: "discard",
+  scope: "source.applescript",
+  uuid: "BA54AD1A-04AC-4CD1-B282-7F65D58EFE2B"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n\n# Turn the selected text into a function with\n# positional arguments.\n\nNAME=\"$(cat)\"\nif [[ -z \"$NAME\" ]]; then\n\tNAME='${1:function_name}'\nfi\n\ncat <<SNIPPET\non $NAME(\\${2:arguments})\n\t\\${0:-- statements}\nend $NAME\nSNIPPET\n",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "$\n",
+  name: "New Function",
+  output: "insertAsSnippet",
+  scope: "source.applescript",
+  tabTrigger: "on",
+  uuid: "883C87A4-C370-4C92-9307-3C46380EE12F"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/tm/executor\"\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/tm/save_current_document\"\n\nTextMate.save_current_document\nTextMate::Executor.make_project_master_current_document\n\nerror_fd = nil\ndocument = File.read(ENV[\"TM_FILEPATH\"])\n\nTextMate::Executor.run(ENV[\"TM_OSASCRIPT\"] || \"osascript\", \"-ss\", ENV[\"TM_FILEPATH\"], :version_args => [\"-e\", \"\\\"AppleScript \\\" & (AppleScript's version as string)\"]) do |str, type|\n  error_fd ||= IO.for_fd(ENV[\"TM_ERROR_FD\"].to_i)\n  case type\n  when :err\n    if str =~ /^([^\\:]+):(\\d+):(\\d+): (.*?): (.*) \\((-?\\d+)\\)$/ then\n      filepath, start,  stop, err, msg, status = $1, $2.to_i, $3.to_i, $4, $5, $6\n    \n      err = err.gsub(/\\b\\w(?=\\w{3,})/) { |m| m.upcase }\n      \n      error_fd << \"<div id=\\\"exception_report\\\" class=\\\"framed\\\">\\n\"\n      error_fd << \"<p id=\\\"exception\\\"><strong>\#{htmlize err}</strong>: \#{htmlize msg}</p>\\n\"\n    \n      from = document[0..start].rindex(/^/)\n      to = start + document[start..-1].index(/$/)\n      src =  document[from...to]\n    \n      line = document[0...start].count(\"\\n\") + 1\n      column = start - from\n    \n      link = \"txmt://open?line=\#{line}&column=\#{column}\"\n      error_fd << \"<pre>\#{src}\\n\"\n      error_fd << \"\#{' ' * (column)}↑</pre>\"\n      error_fd <<  \"<blockquote><a href=\\\"\#{link}\\\">line \#{line}, column \#{column}</a> in \#{ENV['TM_DISPLAYNAME']}\\n\"\n    \n      error_fd << \"<p>Error \#{status}.</p>\\n\"\n      error_fd << \"</div>\\n\"\n      \n      error_fd.flush\n      \"\"\n    else\n      \"<span class=\\\"err\\\" style=\\\"color:red;\\\">\#{htmlize(str)}</span><br/>\"\n    end\n  when :out\n    htmlize(str)\n  end\nend\n",
+  input: "document",
+  keyEquivalent: "@r",
+  name: "Run",
+  output: "showAsHTML",
+  scope: "source.applescript",
+  uuid: "28D28F3B-C59B-4387-A67E-65CFF1CBC62B"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\nscrpt = STDIN.read\n\nif scrpt =~ /\\A\\s*osascript\\s+-e\\s*(.*)\\z/m then\n  scrpt = $1.gsub(/\\s+-e\\s*/, \"\\n\")\n  scrpt.gsub!(/\\\\(')|'([^']*)'/, '\\1\\2')\n  print \"${0:\", scrpt.gsub(/[$`\\\\}]/, '\\\\\\\\\\0'), \"}\"\n  %x{ { sleep .1; osascript -e 'tell app \"System Events\" to keystroke \"[\" using {command down, option down}'; } &>/dev/null & } # Indent Selection\n  exit 204 # this signals exit_insert_as_snippet\nelse\n  lines = scrpt.collect { |line| line.chomp.gsub(/'/, \"'\\\\\\\\''\") }\n  lines.collect! { |line| \"-e '\#{line.strip}'\" }\n  print \"osascript \" + lines.join(' ')\nend\n",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "^H",
+  name: "Toggle AppleScript / osascript",
+  output: "replaceSelectedText",
+  scope: "source.applescript, source.shell",
+  uuid: "B85D7CB4-5A47-4B49-831F-F2CCBFC5F48F"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\n# AppleScript strings cannot handle Unicode text, so\n# any Unicode characters entered in a string will\n# simply be dropped when the script is run.  However,\n# a Unicode text object obviously has no trouble\n# accepting any characters.  This command toggles\n# between raw unicode data and a \" delimited string,\n# to simplify the creation of Unicode text objects.\n\ncase txt = STDIN.read\n  when /\\A«data utxt([0-9A-F]+)»(?: as Unicode text)?\\z/i then\n    decoded = $1.gsub(/([0-9A-F]{4})/i) { |m| [$1.hex].pack(\"U\") }\n    print '\"' + decoded + '\"'\n\n  when /\\A«data utf8([0-9A-F]+)»(?: as Unicode text)?\\z/i then\n    decoded = $1.gsub(/../) { |i| i.hex.chr }\n    print '\"' + decoded + '\"'\n\n  when /\\A\"(.*)\"\\z/ then\n    encoded = \"\"\n    $1.each_byte { |b| encoded << format(\"%02X\", b) }\n    print '«data utf8' + encoded + '» as Unicode text'\n\n  else\n    print txt\nend\n",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "^\"",
+  name: "Toggle String / «data utf8»",
+  output: "replaceSelectedText",
+  scope: 
+   "string.quoted.double.applescript, constant.other.data.utxt.applescript",
+  uuid: "7B6716C8-A890-4803-8C61-5E31F1A4BE63"}]

data/config/commands/Blogging.rb

@@ -0,0 +1,72 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -rjcode -Ku\nrequire \"\#{ENV['TM_BUNDLE_SUPPORT']}/lib/blogging.rb\"\nBlogging.new.choose_blog_endpoint",
+  input: "none",
+  name: "Blog",
+  output: "afterSelectedText",
+  scope: "text.blog",
+  tabTrigger: "blog",
+  uuid: "C316CEDC-A4E1-41DE-B102-CDF78845ACF3"},
+ {beforeRunningCommand: "nop",
+  bundleUUID: "79741B2E-271D-4CBC-A61A-380C83D36863",
+  command: 
+   "#!/usr/bin/env ruby -rjcode -Ku\nrequire \"\#{ENV['TM_SUPPORT_PATH']}/lib/progress\"\nrequire \"\#{ENV['TM_SUPPORT_PATH']}/lib/exit_codes\"\nrequire \"\#{ENV['TM_SUPPORT_PATH']}/lib/escape\"\nrequire \"\#{ENV['TM_BUNDLE_SUPPORT']}/lib/blogging\"\nrequire 'xmlrpc/client'\n\n# fetches available categories (only tested with Wordpress)\n\ndef select_from_cats(cats)\n  # the metaWeblog API says the result is a per-category struct containing a\n  # description, but nothing about a categoryName (which e.g. WP will *also*\n  # give us). So we prefer a categoryName, then falls back on description,\n  # though Typo just returns strings instead of structs, so we handle that as\n  # well\n  names = cats.map do |p|\n    if Hash === p && p.has_key?('categoryName')\n      p['categoryName']\n    elsif Hash === p && p.has_key?('description')\n      p['description']\n    else\n      p.to_s\n    end\n  end\n\n  names.sort! { |a, b| a <=> b }\n  names.map! { |p| '\"' + e_as(p) + '\"' }\n\n  res = %x{ iconv <<'APPLESCRIPT' -f utf-8 -t mac|osascript 2>/dev/null\n    tell app \"TextMate\" to ¬\n      return choose from list { \#{names.join ','} } ¬\n        with title \"Categories\" ¬\n        with prompt \"Choose categories to insert:\" ¬\n        OK button name \"Insert\" ¬\n        with multiple selections allowed\n  }.chomp\n\n  TextMate.exit_discard if res == 'false'\n  puts res.gsub(/([^,]+),?\\s*/, \"Category: \\\\1\\n\")\nend # select_cats\n\ncred = Blogging.new\nendpoint = cred.endpoint\nusername = cred.username\npassword = cred.password\nres = TextMate.call_with_progress(:title => \"Fetch Categories\", :message => \"Contacting Server “\#{cred.host}”…\") do\n    cred.client.call(\"metaWeblog.getCategories\", endpoint, username, password)\nend\n\nTextMate.exit_show_tool_tip \"No categories are available!\" if res.nil? || res.empty?\nselect_from_cats(res)\n",
+  input: "document",
+  name: "Category",
+  output: "afterSelectedText",
+  scope: 
+   "text.blog, text.blog text.html.markdown, text.blog text.plain, text.blog text.html.textile, text.blog text.html",
+  tabTrigger: "cat",
+  uuid: "40318F5D-111F-4451-BBB0-F282DEAC881F"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -rjcode -Ku\nrequire \"\#{ENV['TM_BUNDLE_SUPPORT']}/lib/blogging.rb\"\nBlogging.new.fetch",
+  input: "none",
+  name: "Fetch Post",
+  output: "openAsNewDocument",
+  uuid: "FA5DC73E-AAE0-4C69-86E1-87B9E0390FD0"},
+ {beforeRunningCommand: "nop",
+  bundleUUID: "79741B2E-271D-4CBC-A61A-380C83D36863",
+  command: 
+   ". \"$TM_SUPPORT_PATH/lib/webpreview.sh\"\nhtml_header \"Blogging Bundle Help\" \"Blogging\"\n\"$TM_SUPPORT_PATH/lib/markdown_to_help.rb\" \"$TM_BUNDLE_SUPPORT/help.markdown\"\nhtml_footer\n",
+  input: "selection",
+  name: "Help",
+  output: "showAsHTML",
+  scope: "text.blog",
+  uuid: "17B2F39B-5CCB-4B0E-B305-8C27BED56887"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -rjcode -Ku\nrequire \"\#{ENV['TM_BUNDLE_SUPPORT']}/lib/blogging.rb\"\nBlogging.new.post_or_update",
+  input: "document",
+  keyEquivalent: "^@p",
+  name: "Post to Blog",
+  output: "showAsTooltip",
+  scope: "text.blog",
+  uuid: "60853977-B0D2-4776-A3D9-4B6C09E18596"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -rjcode -Ku\nrequire \"\#{ENV['TM_BUNDLE_SUPPORT']}/lib/blogging.rb\"\nBlogging.new.preview",
+  input: "document",
+  keyEquivalent: "^~@p",
+  name: "Preview",
+  output: "showAsHTML",
+  scope: 
+   "text.blog, text.blog text.html.markdown, text.blog text.plain, text.blog text.html.textile, text.blog text.html",
+  uuid: "10CFDE4C-E433-48F8-AB94-17E1FBEFC074"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "AccountFile=\"$HOME/Library/Preferences/com.macromates.textmate.blogging.txt\"\nif [[ ! -e \"$AccountFile\" ]]; then\n    echo \"# List of Blogs\n#\n# Enter a blog name followed by the endpoint URL\n#\n# Blog Name      URL\nexample          http://user@example.com/xmlrpc\" > \"$AccountFile\"\nfi\nAccountFile=${AccountFile// /%20} # turn spaces into %20\nopen txmt://open?url=file://$AccountFile",
+  input: "none",
+  name: "Setup Blogs",
+  output: "discard",
+  uuid: "8DCBE1EB-A3CC-4559-872E-34A3643F0BC4"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -rjcode -Ku\nrequire \"\#{ENV['TM_BUNDLE_SUPPORT']}/lib/blogging.rb\"\nBlogging.new.view",
+  input: "document",
+  name: "View Online Version",
+  output: "discard",
+  scope: "text.blog",
+  uuid: "BD6E6210-F4A3-4821-BA43-A9DFF4178704"}]

data/config/commands/Bulletin Board.rb

@@ -0,0 +1,10 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: "php \"$TM_BUNDLE_SUPPORT/bbparser.php\"",
+  input: "document",
+  keyEquivalent: "^~@p",
+  name: "Preview",
+  output: "showAsHTML",
+  scope: "text.bbcode",
+  uuid: "32232356-5D3E-42FC-B7F5-35C45F42F010"}]

data/config/commands/Bundle Development.rb

@@ -0,0 +1,83 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: "tr <<< \"$TM_SCOPE\" ' ' '\\n'|pbcopy",
+  input: "none",
+  keyEquivalent: "^@C",
+  name: "Copy Scope",
+  output: "discard",
+  uuid: "F9CD7A8F-9EE9-483B-86BE-12D576AFC036"},
+ {beforeRunningCommand: "nop",
+  bundleUUID: "3CC1A984-EF93-4011-ADDC-FE2E10C6FB23",
+  command: 
+   "#!/usr/bin/env ruby\n#\n#  regexp_to_list.rb\n#  Created by Hans-Jörg Bibiko on 2008-09-22.\n#\n#  Read a optimized regexp from stdin and output a list of all matched keywords\n#\n\ndef decompileRe (reStr)\n  # handle foo(bar|boo|bou)? => foo|foobar|fooboo|foobou\n  re = Regexp.new(/\\b(\\w+)\\(([^(]+?)\\)\\?/)\n  while m = reStr.match(re) do\n    reStr.sub!(re, \"\#{m[1]}|\#{m[2].split('|').map {|x| m[1] + x }.join('|')}\")\n  end\n  # handle foo(bar|boo|bou) => foobar|fooboo|foobou recursively\n  re = Regexp.new(/\\b(\\w+)\\(([^(]+?)\\)/)\n  while m = reStr.match(re)  do\n    reStr.sub!(re, \"\#{m[2].split('|').map {|x| m[1] + x }.join('|')}\")\n  end\n  # return sorted array and delete last () if there're\n  return reStr.split('|').map {|x| x.gsub(/(\\(|\\))/,'')}.sort\nend\n\n\ndecompileRe(STDIN.read.chomp).each {|r| puts r}",
+  fallbackInput: "none",
+  input: "selection",
+  name: "Deoptimize Regex Alternations",
+  output: "openAsNewDocument",
+  uuid: "857CF8FA-C613-4D48-9739-58EE774D639E"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "echo \"<html><head><meta http-equiv=\\\"Refresh\\\" content=\\\"0; http://www.macromates.com/textmate/manual/language_grammars#naming_conventions\\\"></head><body></body></html>\"",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "Help: Scope Conventions",
+  output: "showAsHTML",
+  scope: 
+   "string.quoted.single.scope.tm-grammar, string.quoted.single.scope.root.tm-grammar, string.quoted.double.scope.tm-grammar, string.quoted.double.scope.root.tm-grammar",
+  uuid: "385A50A5-37DB-4B58-A6B0-1849D17A322F"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\nscope   = STDIN.read\n\n# If we are working on a selection, exit\nif ENV['TM_SELECTED_TEXT'] then\n  if scope =~ /\\A\\d+\\Z/ then\n    print scope\n    exit\n  end\n  print \"\\n\"\n  exit\nend\n\nsnippet = \"\"\nrules   = []\nbefore_caret = 0\n\ntype = scope.match(/((beginC|endC|c)aptures)/)[0]\n# Compute position of the caret.\ncaretpos = ENV['TM_LINE_NUMBER'].to_i() - ENV['TM_INPUT_START_LINE'].to_i() + 1\n\n# Figure out how many rules come before the caret\nscope.sub(/(\n              (.*\\n){\#{caretpos}}     |   # Match normally.\n              (.*\\n)+                 |   # Match for if the caret is on the last line.\n              (.*)                        # Match for scope with no newline.\n           )/x) { |match|\n  match.gsub(/\\d\\s*=/) {|m| before_caret += 1 }\n}\n\n# Add each existing rule to the rules array and clean it up in the process.\nscope.gsub(/(\\d+\\s*=\\s*\\{\\s*name\\s*=.*?\\};)/) { |match|\n  rules << match.gsub(/(\\d+)\\s*=\\s*\\{\\s*name\\s*=\\s*'((?:'(?=')|.)*?)'\\s*\\};/, \"\\1 = { name = '\\2' };\")\n}\n\n# Insert new rule, either in the middle or after other rules depending\n# on previously determined caret position.\nif rules.length >= before_caret\n  rules.insert(before_caret, \"${1:⁋} = { name = '$2'; };$0\")\nelse\n  rules << \"${1:⁋} = { name = '$2'; };$0\"\nend\n\n# Add each rule to the output\nrules.each { |rule|\n  snippet << \"\\t\" + rule + \"\\n\"\n}\n\n# Use the first number that hasn't been used yet as the default.\n1.upto(rules.length) { |capnum|\n  unless snippet =~ /\\b\#{capnum.to_s}\\s*=/ then\n    snippet.gsub!(/⁋/) { |match| capnum.to_s }\n    break\n  end\n}\n\n# Add wrapper {}\nif scope =~ /aptures\\s*=[^\\n]*\\{/ then\n  snippet = \"\#{type} = {\\n\#{snippet}};\"\nelse\n  snippet = \"\#{type} =\\n{\#{snippet}};\"\nend\n\nprint snippet",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "",
+  name: "New Captures Rule",
+  output: "insertAsSnippet",
+  scope: "source.plist.tm-grammar meta.dictionary.captures",
+  uuid: "02F6DE2C-3334-4DCE-9FBB-6F8906653E5C"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n#\n#  list_to_regexp.rb\n#  Created by Allan Odgaard on 2005-11-28.\n#\n#  Takes list of matches on successive lines and outputs\n#  a compact regexp which will match any of the elements\n#  in the list\n#\n\ndef process_list (list)\n\n  buckets = { }\n  optional = false\n\n  list.each do |str|\n    if str.empty? then\n      optional = true\n    else\n      ch = str.shift\n      buckets[ch] = (buckets[ch] or []).push(str)\n    end\n  end\n\n  unless buckets.empty? then\n    ptrns = buckets.collect do |key, value|\n      [key].pack('C') + process_list(value).to_s\n    end\n\n    if optional == true then\n      \"(\" + ptrns.join(\"|\") + \")?\"\n    elsif ptrns.length > 1 then\n      \"(\" + ptrns.join(\"|\") + \")\"\n    else\n      ptrns\n    end\n  end\n\nend\n\nprint process_list(STDIN.collect { |line| line.chomp.unpack('C*') })\n",
+  input: "selection",
+  name: "Optimize Regex Alternations",
+  output: "replaceSelectedText",
+  uuid: "442B31EC-07A9-45E4-92D1-B083EB088CDB"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -wKU\n\nrequire \"\#{ENV['TM_SUPPORT_PATH']}/lib/current_word\"\nrequire \"\#{ENV['TM_SUPPORT_PATH']}/lib/ui\"\nrequire \"\#{ENV['TM_SUPPORT_PATH']}/lib/exit_codes\"\n\npartial_scope = Word.current_word('a-zA-Z._#+-', :left)\nmatches = []\n\n# Only if we are in an empty include rule, otherwise use the main scope completion.\nif ENV['TM_SCOPE'] =~ /string\\.quoted\\.(single|double)\\.include/ && partial_scope == \"\"\n  options = []\n  options << { 'title' => \"Selected Grammar ($base)\", 'string' => \"\\\\$base\" }\n  options << { 'title' => \"This Grammar ($self)\", 'string' => \"\\\\$self\" }\n  options << { 'title' => \"Repository Item\", 'string' => \"\\\#${0:repository_item}\" }\n  options << { 'separator' => 1 }\n  options << { 'title' => \"source\", 'string' => \"source.\" }\n  options << { 'title' => \"text\", 'string' => \"text.\" }\n  res = TextMate::UI.menu(options)\n  print res['string'] if res\n  exit 204\nend\n\nif ENV['TM_SCOPE'] =~ /string\\.quoted\\.(single|double)\\.scope\\.root/\n  $scopes = \"source.\\ntext.html.\\ntext.plain.\\ntext.xml.\"\nelse\n  $scopes = DATA.read\nend\n\n$scopes.each_line do |line|\n  matches << $1 if line =~ /(^\#{Regexp.escape partial_scope}[-a-zA-Z._#+]*?\\.)/\nend\n\nmatches.uniq!\n\noptions = Array.new(matches)\n\nmatches.collect! { |m| m.sub(/\#{Regexp.escape partial_scope}(.*)/, '\\1') }\noptions.collect! { |m| m.sub(/^(.*)\\.$/, '\\1') }\n\nif matches.empty?\n  print \"\"\nelsif matches.length == 1\n  print matches.first\nelsif index = TextMate::UI.menu(options)\n  print matches[index]\nend\n\n__END__\n\ncomment.block.documentation.\ncomment.block.empty.\ncomment.block.preprocessor.\ncomment.line.apostrophe.\ncomment.line.asterisk.\ncomment.line.at-sign.\ncomment.line.backtick.\ncomment.line.double-backslash.\ncomment.line.double-dash.\ncomment.line.double-dash.\ncomment.line.double-dot.\ncomment.line.double-number-sign.\ncomment.line.double-slash.\ncomment.line.exclamation.\ncomment.line.number-sign.\ncomment.line.parentheses.\ncomment.line.percent.\ncomment.line.percentage.\ncomment.line.semicolon.\ncomment.line.slash.\nconstant.character.entity.\nconstant.character.escape.\nconstant.language.boolean.\nconstant.language.null.\nconstant.numeric.base64.\nconstant.numeric.float.\nconstant.numeric.integer.binary.\nconstant.numeric.integer.decimal.\nconstant.numeric.integer.hexadecimal.\nconstant.numeric.integer.long.\nconstant.numeric.integer.octal.\nconstant.other.placeholder.\nconstant.other.reference.\nconstant.other.symbol.\nentity.name.function.\nentity.name.section.\nentity.name.tag.block.\nentity.name.tag.form.\nentity.name.tag.inline.\nentity.name.tag.localname.\nentity.name.tag.meta.\nentity.name.tag.object.\nentity.name.type.class.\nentity.name.type.module.\nentity.other.attribute-name.\nentity.other.inherited-class.\ninvalid.deprecated.obsolete.\ninvalid.deprecated.trailing-whitespace.\ninvalid.illegal.whitespace\nkeyword.control.def.\nkeyword.control.directive.\nkeyword.control.exception.\nkeyword.control.import.\nkeyword.operator.arithmetic.\nkeyword.operator.assignment.\nkeyword.operator.comparison.\nkeyword.operator.logical.\nkeyword.other.directive.\nkeyword.other.documentation.\nmarkup.bold.\nmarkup.deleted.\nmarkup.heading.\nmarkup.italic.\nmarkup.list.numbered.\nmarkup.list.unnumbered.\nmarkup.other.\nmarkup.quote.\nmarkup.raw.block.\nmarkup.raw.inline.\nmarkup.underline.link.\nmeta.array.\nmeta.block.\nmeta.class.\nmeta.definition.\nmeta.directive.\nmeta.element.\nmeta.embedded.block.\nmeta.embedded.expression.\nmeta.embedded.line.\nmeta.expression.\nmeta.function.\nmeta.group.\nmeta.header.\nmeta.link\nmeta.module.\nmeta.paragraph.\nmeta.preprocessor.\nmeta.property.\nmeta.scope.\nmeta.section\nmeta.separator.\nmeta.structure.\nmeta.tag.block.\nmeta.tag.form.\nmeta.tag.inline.\nmeta.tag.meta.\nmeta.tag.object.\nmeta.tag.preprocessor.\nmeta.toc-list.\npunctuation.definition.arguments.begin.\npunctuation.definition.arguments.end.\npunctuation.definition.array.begin.\npunctuation.definition.array.end.\npunctuation.definition.comment.\npunctuation.definition.constant.\npunctuation.definition.entity.\npunctuation.definition.function.\npunctuation.definition.heading.\npunctuation.definition.keyword.\npunctuation.definition.parameters.begin.\npunctuation.definition.parameters.end.\npunctuation.definition.preprocessor.\npunctuation.definition.string.begin.\npunctuation.definition.string.end.\npunctuation.definition.tag.\npunctuation.definition.variable.\npunctuation.section.array.\npunctuation.section.class.\npunctuation.section.embedded.begin.\npunctuation.section.embedded.end.\npunctuation.section.function.\npunctuation.section.group.\npunctuation.section.scope.\npunctuation.separator.arguments.\npunctuation.separator.array.\npunctuation.separator.continuation.\npunctuation.separator.key-value.\npunctuation.separator.parameters.\npunctuation.terminator.expression.\npunctuation.terminator.function.\npunctuation.terminator.rule.\npunctuation.terminator.statement.\npunctuation.whitespace.comment.leading.\npunctuation.whitespace.comment.trailing.\npunctuation.whitespace.embedded.leading.\npunctuation.whitespace.embedded.trailing.\nsource.\nstorage.modifier.extends.\nstorage.modifier.global.\nstorage.modifier.implements.\nstorage.type.class.\nstorage.type.function.\nstorage.type.method.\nstorage.type.module.\nstring.interpolated.\nstring.other.\nstring.quoted.double.\nstring.quoted.other.\nstring.quoted.single\nstring.quoted.triple.\nstring.regexp.\nstring.unquoted.heredoc.\nsupport.class.\nsupport.constant.\nsupport.function.\nsupport.other.\nsupport.type.\nsupport.variable.\ntext.html.\ntext.plain.\ntext.xml.\nvariable.language.\nvariable.other.predefined.\nvariable.other.readwrite.global.\nvariable.other.register.\nvariable.parameter.\n",
+  fallbackInput: "scope",
+  input: "none",
+  keyEquivalent: "",
+  name: "Scope Completion",
+  output: "afterSelectedText",
+  scope: 
+   "string.quoted.single.scope.tm-grammar -punctuation.definition.string.begin, string.quoted.single.scope.root.tm-grammar -punctuation.definition.string.begin,  string.quoted.single.include.tm-grammar -punctuation.definition.string.begin, string.quoted.double.scope.tm-grammar -punctuation.definition.string.begin, string.quoted.double.scope.root.tm-grammar -punctuation.definition.string.begin,  string.quoted.double.include.tm-grammar -punctuation.definition.string.begin",
+  uuid: "DF2093BA-EA37-4546-9ADA-C17A13CEBDA9"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# this will compare the current document against the last\n# version checked out from subversion, but will do it in\n# the pretty-printed format (via pl)\n\npl|diff -u <(\"${TM_SVN:-svn}\" cat \"$TM_FILENAME\"|pl) -\n",
+  input: "document",
+  name: "Show Changes (for XML Property List)",
+  output: "openAsNewDocument",
+  scope: "text.xml.plist",
+  uuid: "275BF397-2458-4F2F-B0CE-5CDF68256B69"},
+ {beforeRunningCommand: "nop",
+  command: "tr <<< \"$TM_SCOPE\" ' ' '\\n'",
+  input: "none",
+  keyEquivalent: "^P",
+  name: "Show Scope",
+  output: "showAsTooltip",
+  uuid: "48976460-B5A4-11D9-87C9-000D93589AF6"},
+ {beforeRunningCommand: "nop",
+  beforeRunningScript: "nop",
+  captureFormatString: "(1?$2:<nop>)",
+  capturePattern: "(^TM_(.*)$)?",
+  command: "env|grep ^TM_|sort",
+  input: "none",
+  keyEquivalent: "^@P",
+  name: "Show TM_* Variables",
+  output: "showAsTooltip",
+  standardInput: "selectedText",
+  standardOutput: "separateWindow",
+  uuid: "DA0A4E77-5F16-11D9-B9C3-000D93589AF6"}]

data/config/commands/C++ Qt.rb

@@ -0,0 +1,158 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: "${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/add_file.rb\"",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "@u",
+  name: "Add File",
+  output: "replaceSelectedText",
+  scope: "source.qmake",
+  uuid: "82073EA0-7D10-4A6C-AF49-54B29FA3AF1E"},
+ {beforeRunningCommand: "nop",
+  command: "\"${TM_BUNDLE_SUPPORT}/bin/build_qt_project.rb\"",
+  input: "none",
+  keyEquivalent: "@b",
+  name: "Build",
+  output: "showAsHTML",
+  scope: "source.c++.qt, source.qmake",
+  uuid: "AAAD64D1-8C69-4645-853E-B6DD3D04AC67"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/sh\n\"${TM_BUNDLE_SUPPORT}/bin/build_qt_project.rb\" && \"${TM_BUNDLE_SUPPORT}/bin/run_qt_project.rb\"",
+  input: "none",
+  keyEquivalent: "@R",
+  name: "Build & Run",
+  output: "showAsHTML",
+  scope: "source.c++.qt, source.qmake",
+  uuid: "22F431D0-0CB5-4CAB-951F-8C0E7396891F"},
+ {beforeRunningCommand: "nop",
+  command: "${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/insert_class.rb\"",
+  input: "none",
+  name: "Class",
+  output: "insertAsSnippet",
+  scope: "source.c++.qt",
+  tabTrigger: "qclass",
+  uuid: "1DB2A2E8-5E25-4442-9DE1-335E09854C9F"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/insert_class.rb\" doxygen",
+  input: "none",
+  name: "Class (with Doxygen)",
+  output: "insertAsSnippet",
+  scope: "source.c++.qt",
+  tabTrigger: "qclassdoxy",
+  uuid: "BFD08AAF-3AB2-4C55-9A57-2EB75ECD9CD1"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# Converts method declarations to their\n# out-of-class-declaration implementations.\n#\n# Could be applied to bunch of methods in\n# selection.\n\n${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/declaration_to_implementation.rb\"",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "@u",
+  name: "Declaration to Implementation",
+  output: "insertAsSnippet",
+  scope: "source.c++.qt",
+  uuid: "C4517F03-DB1A-434E-BF29-F13DA337B20F"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# Converts method declarations to their\n# out-of-class-declaration implementations\n# with Doxygen placeholders in place.\n#\n# Could be applied to bunch of methods in\n# selection.\n#\n# It's possible to override Doxygen placeholders\n# after specifying name of the class.\n\n${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/declaration_to_implementation.rb\" doxygen",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "@u",
+  name: "Declaration to Implementation (with Doxygen)",
+  output: "insertAsSnippet",
+  scope: "source.c++.qt",
+  uuid: "97D13B6C-9CC2-4CAD-8CD3-80DC9CBC1968"},
+ {beforeRunningCommand: "nop",
+  command: "${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/search.rb\" input",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "^@h",
+  name: "Display Documentation",
+  output: "showAsHTML",
+  scope: "source.c++.qt",
+  uuid: "D4885A64-9FF5-43BA-8D5E-AEB71E9E08C2"},
+ {beforeRunningCommand: "nop",
+  command: "${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/search.rb\" fuzzy input",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "^~@h",
+  name: "Display Fuzzy Documentation",
+  output: "showAsHTML",
+  scope: "source.c++.qt",
+  uuid: "F34F4BC0-C09C-4DAC-9B0C-EE7173964090"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\nrequire ENV['TM_SUPPORT_PATH']+'/lib/exit_codes'\n\nword = (ENV['TM_SELECTED_TEXT'] or ENV['TM_CURRENT_WORD'] or '')\ndir  = (ENV['TM_QT_DOC_DIR'] or '/usr/local/Trolltech/Qt-4.2.0/doc/html')\n\nword.strip! unless word.frozen?\n\nif word.nil?\n  puts \"Nothing given to search for.\"\n  \nelse\n  doc_file = \"\#{dir}/\#{word.downcase}.html\"\n  \n  if File.exists? doc_file\n    TextMate::exit_show_html \"<meta http-equiv='Refresh' content='0;URL=tm-file://\#{doc_file}'>\"\n  else\n    spotted = `mdfind \#{word}`\n    files   = spotted.grep %r{^\#{Regexp::escape dir}/.+\\.html$}\n    \n    unless files.any?\n      puts \"No Documentation found for '\#{word}'.\"\n    else\n      puts %{\n      <html>\n      <head><title>Spotlight results for '\#{word}'</title>\n      <style>\n        a:link { color: #004faf; text-decoration: none }\n        a:visited { color: #672967; text-decoration: none }\n        h1 { text-align: center }\n        span.intro { color: #999 }\n        div.navi img {\n          vertical-align: -35%;\n          margin-right: 4px;\n        }\n      </style>\n      <body>\n      \n      <div class=\"navi\">\n        <img src=\"tm-file://\#{dir}/images/qt-logo.png\">\n        <a href=\"tm-file://\#{dir}/index.html\">Home</a> &middot;\n        <a href=\"tm-file://\#{dir}/classes.html\">All Classes</a> &middot;\n        <a href=\"tm-file://\#{dir}/mainclasses.html\">Main Classes</a> &middot;\n        <a href=\"tm-file://\#{dir}/groups.html\">Grouped Classes</a> &middot;\n        <a href=\"tm-file://\#{dir}/modules.html\">Modules</a> &middot;\n        <a href=\"tm-file://\#{dir}/functions.html\">Functions</a>\n      </div>\n      \n      <h1>Spotlight results for '\#{word}'</h1><ul>}\n      \n      files.each do |file|\n        head  = File.open(file.chop).read(4000)\n        title = head.scan(/<title>Qt \\d\\.\\d: (.+)<\\/title>/).first.first\n        intro = head.scan(/<p>(.{16,})<\\/p>/).first\n        \n        unless intro.nil?\n          intro = intro.first.gsub(/<.+?>/, '')[0..(107-title.size)]+'&hellip;'\n        end\n        \n        puts %{<li><a href=\"tm-file://\#{file.chop}\">\#{title}</a>\n               <span class=\"intro\">\#{intro}</span></li>}\n      end\n      puts \"</ul></body></html>\"\n      \n      TextMate::exit_show_html\n    end\n  end\n  \nend",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "Doc Lookup",
+  output: "showAsTooltip",
+  scope: "source.c++.qt",
+  uuid: "D663259E-0526-11DB-A7A9-0011242E4184"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# Similiar to entering query in the Qt Assistant's\n# \"Look For:\" field, and pressing enter. If \n# there are multiple matches, there's an option\n# to select one of them.\n\n${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/search.rb\"",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "^h",
+  name: "Documentation for Word / Selection",
+  output: "showAsHTML",
+  scope: "source.c++.qt",
+  uuid: "DAD33E78-4FEF-43EB-A672-790E7140855A"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# Similiar to entering query in the Qt Assistant's\n# \"Look For:\" field, then collecting topics for\n# each displayed method, and then displaying an\n# option to pick one of them using text box.\n\n${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/search.rb\" fuzzy",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "^~h",
+  name: "Fuzzy Documentation for Word / Selection",
+  output: "showAsHTML",
+  scope: "source.c++.qt",
+  uuid: "C6BD2114-7620-4C35-A9B5-F44CA3291004"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/implementation_to_declaration.rb\"",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "@u",
+  name: "Implementation to Declaration",
+  output: "insertAsSnippet",
+  scope: "source.c++.qt",
+  uuid: "CC1A1191-7451-4806-B326-459416C8894A"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# Inserts a call to the same metod of superclass.\n# Since figuring a superclass is a bit tricky, it \n# only works when class declaration exists in the \n# same file, and prior to the current line. If \n# it's unable to find superclass, QWidget is used.\n\n${TM_RUBY:-ruby} \"$TM_BUNDLE_SUPPORT/bin/insert_super.rb\"",
+  input: "document",
+  name: "Insert Call to Super",
+  output: "insertAsSnippet",
+  scope: "source.c++.qt",
+  tabTrigger: "super",
+  uuid: "02131A74-BB30-4A92-B8D0-BDD96FF9CD88"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n# By Allan Odgaard: \n# http://macromates.com/blog/archives/2006/04/12/customization-screencast/\n\ntxt = STDIN.read.gsub(%r{\\A/|\\*/\\z}, '')\ntxt = txt.gsub(/^[ \\t]*\\*[ \\t]*/, '')\ntxt = %x{ fmt <<< '\#{txt.gsub(/'/, \"'\\\\\\\\''\")}' }.chomp\ntxt = txt.gsub(/[$`\\\\]/, '\\\\\\\\\\0')\ntxt = txt.sub(/(\\n(?=\\n))?(\\n*)\\z/, '\\1$0\\2')\nprint \"/* \" + txt.to_a.join(' * ') + \" */\"",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "^q",
+  name: "Reformat Block Comment",
+  output: "insertAsSnippet",
+  scope: "source.c++.qt comment.block.c",
+  uuid: "68EA4D87-31FA-4492-9645-925128AB6C43"},
+ {beforeRunningCommand: "nop",
+  command: "\"${TM_BUNDLE_SUPPORT}/bin/run_qt_project.rb\"",
+  input: "none",
+  keyEquivalent: "@r",
+  name: "Run",
+  output: "showAsTooltip",
+  scope: "source.c++.qt, source.qmake",
+  uuid: "97FDD49E-0E1B-4B68-9614-E57A5804C247"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "echo \"<meta http-equiv='Refresh' content='0;URL=tm-file://${TM_QT_DOC_DIR:=/usr/local/Trolltech/Qt-4.2.0/doc/html}/qmake-manual.html'>\"",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "Show qmake Manual",
+  output: "showAsHTML",
+  scope: "source.qmake",
+  uuid: "E91A719F-109D-4243-B943-A85F9FECEBE0"}]