ver 2010.02 → 2010.08

data/config/commands/Lisp.rb

@@ -0,0 +1,20 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: 
+   ". \"$TM_SUPPORT_PATH/lib/webpreview.sh\"\nhtml_header \"Documentation for Word\" \"Common Lisp HyperSpec\"\nread KEYWORD\necho \"<ul>\"\ncurl -s \"http://www.lisp.org/HyperSpec/FrontMatter/Symbol-Index-Alphabetical.html\" | grep -E \"<LI><A.* HREF=\\\".+\\\"><B>.*$KEYWORD.*</B></A>\" | sed -E \"s/<LI><A.* HREF=\\\"\\.\\.(.+)\\\"><B>(.+)<\\/B><\\/A>/<li><a href=\\\"http:\\/\\/www.lisp.org\\/HyperSpec\\1\\\">\\2<\\/a><\\/li>/\"\necho \"</ul>\"\nhtml_footer\n",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "^h",
+  name: "Documentation for Word",
+  output: "showAsHTML",
+  scope: "source.lisp",
+  uuid: "DCCF29B4-80E9-4DF8-A9EC-28F91611665F"},
+ {beforeRunningCommand: "nop",
+  command: 
+   ". \"$TM_SUPPORT_PATH/lib/webpreview.sh\"\nhtml_header \"Lisp Bundle Help\" \"Lisp\"\n\"$TM_SUPPORT_PATH/lib/markdown_to_help.rb\" \"$TM_BUNDLE_SUPPORT/help.markdown\"\nhtml_footer\n",
+  input: "none",
+  name: "Help",
+  output: "showAsHTML",
+  scope: "source.lisp",
+  uuid: "0D68EA05-DF84-4EE3-89A1-1A57FB2BAE59"}]

data/config/commands/Logo.rb

@@ -0,0 +1,10 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: "/usr/bin/env logo \"$TM_FILEPATH\"\n",
+  input: "none",
+  keyEquivalent: "@r",
+  name: "Run",
+  output: "openAsNewDocument",
+  scope: "source.logo",
+  uuid: "D03092A5-DED1-4527-9FF0-00E7EC10A0E0"}]

data/config/commands/Logtalk.rb

@@ -0,0 +1,34 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: 
+   "cd \"$TM_DIRECTORY\"\nFILE=`basename \"$TM_FILENAME\" .lgt`\n$LOGTALK_COMMAND \"logtalk_compile($FILE), halt.\"\n",
+  input: "none",
+  name: "Compile",
+  output: "openAsNewDocument",
+  scope: "source.logtalk",
+  uuid: "2AC5EDAA-D94D-43E5-A685-D0F89AC665DD"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "cd \"$TM_DIRECTORY\"\nFILE=`basename \"$TM_FILENAME\" .lgt`\n$LOGTALK_COMMAND \"logtalk_compile($FILE), halt.\"\n$LOGTALK_PDF_COMMAND\nopen *.pdf\n",
+  input: "none",
+  name: "Generate PDF documentation",
+  output: "openAsNewDocument",
+  scope: "source.logtalk",
+  uuid: "885F35BF-59A5-4746-A554-E4B558690871"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "cd \"$TM_DIRECTORY\"\nFILE=`basename \"$TM_FILENAME\" .lgt`\n$LOGTALK_COMMAND \"logtalk_compile($FILE), halt.\"\nlgt2txt\nopen *.txt\n",
+  input: "none",
+  name: "Generate TEXT documentation",
+  output: "openAsNewDocument",
+  scope: "source.logtalk",
+  uuid: "69FAC018-D43E-4AF7-AAB2-65F200E53709"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "cd \"$TM_DIRECTORY\"\nFILE=`basename \"$TM_FILENAME\" .lgt`\n$LOGTALK_COMMAND \"logtalk_compile($FILE), halt.\"\nlgt2html\nopen index.html\n",
+  input: "none",
+  name: "Generate XHTML documentation",
+  output: "openAsNewDocument",
+  scope: "source.logtalk",
+  uuid: "F1BFEF71-F4BF-4CB2-A94A-E2AEC5BBD876"}]

data/config/commands/Lua.rb

@@ -0,0 +1,29 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\nTM_LUAC = ENV['TM_LUAC'] || (ENV['TM_LUA'] ? \"\#{ENV['TM_LUA']}c\" : \"luac\")\n\nrequire ENV['TM_SUPPORT_PATH'] + '/lib/textmate'\n\nTextMate.require_cmd \"\#{TM_LUAC}\"\n\nputs \"using \#{TM_LUAC}\"\nresult = `\"\#{TM_LUAC}\" -p - 2>&1`\nputs result\n\nregexp = /^luac: stdin:(\\d+):/\n\nif result =~ regexp\n  TextMate.go_to :line => $1\nelse\n  puts \"Syntax OK\"\nend\n",
+  input: "document",
+  keyEquivalent: "^V",
+  name: "Check Syntax",
+  output: "showAsTooltip",
+  scope: "source.lua",
+  uuid: "E2D1F434-A472-4185-9933-4D9408C6C4D0"},
+ {beforeRunningCommand: "saveActiveFile",
+  command: 
+   ": ${TM_LUA:=lua}\nrequire_cmd \"$TM_LUA\"\n\"$TM_LUA\" \"$TM_FILEPATH\"|pre",
+  input: "none",
+  keyEquivalent: "@r",
+  name: "Run Script",
+  output: "showAsHTML",
+  scope: "source.lua",
+  uuid: "BF303CAC-FF2B-4299-8F2B-C84FE64B5146"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/bin/bash\n[[ -z \"$TM_FILEPATH\" ]] && TM_TMPFILE=$(mktemp -t pythonInTerm)\n: \"${TM_FILEPATH:=$TM_TMPFILE}\"; cat >\"$TM_FILEPATH\"\n\n: ${TM_LUA:=lua}\nrequire_cmd \"$TM_LUA\"\n\nesc () {\nSTR=\"$1\" ruby <<\"RUBY\"\n   str = ENV['STR']\n   str = str.gsub(/'/, \"'\\\\\\\\''\")\n   str = str.gsub(/[\\\\\"]/, '\\\\\\\\\\\\0')\n   print \"'\#{str}'\"\nRUBY\n}\n\nosascript <<- APPLESCRIPT\n\ttell app \"Terminal\"\n\t    launch\n\t    activate\n\t    do script \"clear; cd $(esc \"${TM_DIRECTORY}\"); $(esc \"${TM_LUA}\") $(esc \"${TM_FILEPATH}\"); rm -f $(esc \"${TM_TMPFILE}\")\"\n\t    set position of first window to { 100, 100 }\n\tend tell\nAPPLESCRIPT\n\n",
+  input: "document",
+  keyEquivalent: "@R",
+  name: "Run Script (Terminal)",
+  output: "discard",
+  scope: "source.lua",
+  uuid: "C7B74C19-5DB5-47A1-A148-3A1019EF4D96"}]

data/config/commands/MEL.rb

@@ -0,0 +1,20 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: 
+   ". \"$TM_SUPPORT_PATH/lib/webpreview.sh\"\nhtml_header \"Maya Embedded Language Help\" \"MEL\"\nMarkdown.pl <<'EOF'\n## Send to Maya\n\nRunning this command will execute either the current selection or the entire script in Maya, using commandPort. Before doing this, Maya must run the following command:\n\n\tcommandPort -n \":2222\";\n\t\nIt is recommended to save that command to a shelf.\n\nEOF\nhtml_footer\n",
+  input: "none",
+  name: "Help",
+  output: "showAsHTML",
+  scope: "source.mel",
+  uuid: "1687B611-98C8-4324-A1B1-88978692C4DB"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n#  Created by Jon Roberts on 2007-10-18.\n# Maya must first run the command:\n# commandPort -n \":2222\";\n\nrequire 'socket'\n\nbegin\n  mel = STDIN.read\n  s = TCPSocket.open(\"localhost\", 2222)\n  s.puts(mel)\nrescue Exception => e\n  puts(\"Error:\\n\"+e+\"\\n...is commandPort enabled? See help command.\")\nend\n",
+  fallbackInput: "document",
+  input: "selection",
+  keyEquivalent: "@r",
+  name: "Send to Maya",
+  output: "showAsTooltip",
+  scope: "source.mel",
+  uuid: "F122D96A-781F-4934-89AD-3BE0BFCDB3C1"}]

data/config/commands/Mail.rb

@@ -0,0 +1,73 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: "${TM_RUBY:-ruby} -e 'print STDIN.read.unpack(\"m*\")[0]'",
+  fallbackInput: "line",
+  input: "selection",
+  name: "Decode Base 64 Line / Selection",
+  output: "replaceSelectedText",
+  uuid: "19A73EFD-E8D2-44D1-A3ED-EF604BB290EF"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby -wKU\nprint STDIN.read.gsub(/=\\n/, '').gsub(/=([0-9A-F]{2})/) { $1.to_i(16).chr }\n",
+  input: "selection",
+  name: "Decode Quoted Printables",
+  output: "replaceSelectedText",
+  uuid: "C0DD4A50-F63F-444F-8661-98FAEC220F51"},
+ {beforeRunningCommand: "nop",
+  command: "perl -pe 's/^> (.*)/$1/'",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "~@'",
+  name: "Decrease Quote Level for Line / Selection",
+  output: "replaceSelectedText",
+  uuid: "B0F37DAC-6E52-11D9-AA12-000D93589AF6"},
+ {beforeRunningCommand: "nop",
+  command: "${TM_RUBY:-ruby} -e 'print STDIN.read.to_a.pack(\"m*\")'",
+  fallbackInput: "line",
+  input: "selection",
+  name: "Encode Base 64 Line / Selection",
+  output: "replaceSelectedText",
+  uuid: "3E70551A-26B8-44FD-9D3F-25954E4ECDE4"},
+ {beforeRunningCommand: "nop",
+  command: "perl -pe 's/(.*)/> $1/'",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "@'",
+  name: "Increase Quote Level for Line / Selection",
+  output: "replaceSelectedText",
+  uuid: "9FEC1836-6E52-11D9-AA12-000D93589AF6"},
+ {beforeRunningCommand: "nop",
+  command: "require_cmd par\n\nPARINIT=\"rTbgqR B=.,?!_A_a Q=_s>|+\" par",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "^q",
+  name: "Reformat Quoted Text",
+  output: "replaceSelectedText",
+  scope: "markup.quote",
+  uuid: "65C64E73-D308-4251-9837-A3A040D5704B"},
+ {beforeRunningCommand: "nop",
+  command: "tr 'A-Za-z' 'N-ZA-Mn-za-m'",
+  fallbackInput: "line",
+  input: "selection",
+  name: "Rot 13 Line / Selection",
+  output: "replaceSelectedText",
+  uuid: "44B4C1CE-DD85-485A-B860-E4DFCDD0A4FE"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# This requires that 'enable access for assistive devices' is enabled\n\n# Create a temporary file so that this works with unsaved documents\nTM_TMPFILE=\"$(mktemp /tmp/tm_mail_XXXXXX).html\" || exit\n\n# Create a title based on the filename, if there is one\nTM_TITLE=${TM_FILENAME:-untitled}\n\ncat   >\"$TM_TMPFILE\"\necho >>\"$TM_TMPFILE\" \"<title>${TM_TITLE%.*}</title>\"\n\nosascript -e 'tell app \"Safari\" to make new document with properties { URL:\"file://'\"$TM_TMPFILE\"'\" }'\nosascript -e 'tell app \"Safari\"' -e 'email contents of first document' -e 'close first document' -e 'end tell'\n\nrm -f \"$TM_TMPFILE\" \"${TM_TMPFILE%.html}\"",
+  input: "document",
+  keyEquivalent: "@D",
+  name: "Send HTML as Email [With Safari]",
+  output: "showAsTooltip",
+  scope: "text.html",
+  uuid: "B3BF8765-30D5-46E7-8331-860B47CDD348"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\ndef quote_level (line)\n  /^[> ]*/.match(line.to_s)[0].count \">\"\nend\n\ndef blank_line? (line)\n  line.nil? || line.sub(/^[> ]*/, '').strip.empty?\nend\n\ndef reformat_lines (lines)\n  non_quoted = lines.collect { |line| line.sub(/^[> ]*/, '').strip }\n  indent = /^[> ]*/.match(lines.first.to_s)[0]\n  indent + non_quoted.join(\" \")\nend\n\nlines = STDIN.read.to_a\n\ncur_qlevel = 0\npar_bounds = [ 0 ]\n\nlines.each_with_index do |line, i|\n  if blank_line?(line) then\n    par_bounds << i\n    par_bounds << i+1\n  elsif cur_qlevel != quote_level(line) then\n    par_bounds << i\n  end\n  cur_qlevel = quote_level(line)\nend\n\npar_bounds.uniq!\npar_bounds.each_with_index do |i, idx|\n  j = idx+1 < par_bounds.size ? par_bounds[idx+1] : lines.size\n  puts reformat_lines(lines[i...j])\nend\n",
+  input: "selection",
+  keyEquivalent: "^Q",
+  name: "Unwrap Paragraphs",
+  output: "replaceSelectedText",
+  scope: "text.mail",
+  uuid: "72DCB8FA-2DAF-46D2-A77C-3459EE982EF6"}]

data/config/commands/Make.rb

@@ -0,0 +1,20 @@
+# Encoding: UTF-8
+
+[{autoScrollOutput: true,
+  beforeRunningCommand: "saveModifiedFiles",
+  command: 
+   "#!/usr/bin/env ruby\n\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/tm/executor\"\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/tm/save_current_document\"\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/escape\"\n\nTextMate::Executor.make_project_master_current_document\n\nDir.chdir(ENV[\"TM_PROJECT_DIRECTORY\"])\nENV[\"TM_MAKE_FILE\"] = ENV[\"TM_PROJECT_DIRECTORY\"] + \"/Makefile\" if ENV[\"TM_MAKE_FILE\"].nil? or not File.file?(ENV[\"TM_MAKE_FILE\"])\n\nflags = [\"-w\"]\nflags << \"-f\" + File.basename(ENV[\"TM_MAKE_FILE\"])\nflags << ENV[\"TM_MAKE_FLAGS\"] unless ENV[\"TM_MAKE_FLAGS\"].nil?\nflags << ENV[\"TM_MAKE_TARGET\"] unless ENV[\"TM_MAKE_TARGET\"].nil?\n\nENV[\"TM_DISPLAYNAME\"] = ENV[\"TM_MAKE_TARGET\"].nil? ? \"default\" : ENV[\"TM_MAKE_TARGET\"]\n\nDir.chdir(File.dirname(ENV[\"TM_MAKE_FILE\"]))\n\ndirs = [ENV['TM_PROJECT_DIRECTORY']]\nTextMate::Executor.run(\"make\", flags, :verb => \"Making\") do |line, type|\n  if line =~ /^make.*?: Entering directory `(.*?)'$/ and not $1.nil? and File.directory?($1)\n    dirs.unshift($1)\n    \"\"\n  elsif line =~ /^make.*?: Leaving directory `(.*?)'$/ and not $1.nil? and File.directory?($1)\n    dirs.delete($1)\n    \"\"\n  elsif line =~ /^(.*?):(?:(\\d+):)?\\s*(.*?)$/ and not $1.nil?\n    expanded_path = dirs.map{ |dir| File.expand_path($1, dir) }.find{ |path| File.file?path }\n    if !expanded_path.nil?\n      \"<a href=\\\"txmt://open?url=file://\#{e_url expanded_path}\#{$2.nil? ? '' : \"&line=\" + $2}\\\">\#{htmlize $3}</a><br>\\n\"\n    end\n  end\nend\n",
+  input: "document",
+  keyEquivalent: "@b",
+  name: "Build",
+  output: "showAsHTML",
+  uuid: "19F9C045-7BCC-429B-8C68-967B6BD15B84"},
+ {autoScrollOutput: true,
+  beforeRunningCommand: "saveModifiedFiles",
+  command: 
+   "#!/usr/bin/env ruby\n\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/tm/executor\"\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/tm/save_current_document\"\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/ui\"\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/exit_codes\"\nrequire ENV[\"TM_SUPPORT_PATH\"] + \"/lib/escape\"\n\nTextMate::Executor.make_project_master_current_document\n\nDir.chdir(ENV[\"TM_PROJECT_DIRECTORY\"])\nENV[\"TM_MAKE_FILE\"] = ENV[\"TM_PROJECT_DIRECTORY\"] + \"/Makefile\" if ENV[\"TM_MAKE_FILE\"].nil? or not File.file?(ENV[\"TM_MAKE_FILE\"])\n\nflags = [\"-w\"]\nflags << \"-f\" + File.basename(ENV[\"TM_MAKE_FILE\"])\nflags << ENV[\"TM_MAKE_FLAGS\"] unless ENV[\"TM_MAKE_FLAGS\"].nil?\n\ntargets = `make -np|grep -B1 PHONY|grep -Ev '^(#|--|\\\\.)'|grep -Eo '^[^:]+'|sort -f`.split.collect{|t| {\"title\" => t} }\nselection = TextMate::UI.menu(targets)\n\nTextMate::exit_discard if selection == nil\nENV[\"TM_MAKE_TARGET\"] = selection['title']\n\nflags << ENV[\"TM_MAKE_TARGET\"] unless ENV[\"TM_MAKE_TARGET\"].nil?\n\nENV[\"TM_DISPLAYNAME\"] = ENV[\"TM_MAKE_TARGET\"].nil? ? \"default\" : ENV[\"TM_MAKE_TARGET\"]\n\nDir.chdir(File.dirname(ENV[\"TM_MAKE_FILE\"]))\n\ndirs = [ENV['TM_PROJECT_DIRECTORY']]\nTextMate::Executor.run(\"make\", flags, :verb => \"Making\") do |line, type|\n  if line =~ /^make.*?: Entering directory `(.*?)'$/ and not $1.nil? and File.directory?($1)\n    dirs.unshift($1)\n    \"\"\n  elsif line =~ /^make.*?: Leaving directory `(.*?)'$/ and not $1.nil? and File.directory?($1)\n    dirs.delete($1)\n    \"\"\n  elsif line =~ /^(.*?):(?:(\\d+):)?\\s*(.*?)$/ and not $1.nil?\n    expanded_path = dirs.map{ |dir| File.expand_path($1, dir) }.find{ |path| File.file?path }\n    if !expanded_path.nil?\n      \"<a href=\\\"txmt://open?url=file://\#{e_url expanded_path}\#{$2.nil? ? '' : \"&line=\" + $2}\\\">\#{htmlize $3}</a><br>\\n\"\n    end\n  end\nend\n",
+  input: "document",
+  keyEquivalent: "~@b",
+  name: "Build Target…",
+  output: "showAsHTML",
+  uuid: "6E5653CE-68E0-42E5-BF29-B3AB323BC218"}]

data/config/commands/Man Pages.rb

@@ -0,0 +1,20 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: 
+   "res=$(ruby -rui -e\"print TextMate::UI.request_string(:title => 'Manual Page', :prompt => 'What manual page do you want?', :button1 => 'View', :button2 => 'Cancel').to_s\")\n\n[[ -z \"$res\" ]] && exit_discard\n\n$(\"$TM_BUNDLE_SUPPORT/mman\"<<<\"$res\")\n",
+  input: "none",
+  keyEquivalent: "",
+  name: "View Man Page",
+  output: "showAsTooltip",
+  uuid: "71AB34F4-755D-4F16-A45F-93CD88246ED7"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# Place a symlink to \"$TM_BUNDLE_SUPPORT/mman\" somewhere in your path\n# and then you can bring up man pages in TextMate via the terminal\n# using \"mman <manpage>\"\n\n\"$TM_BUNDLE_SUPPORT/mman\"",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "",
+  name: "Visit Man Page",
+  output: "showAsTooltip",
+  scope: "markup.underline.link.internal.man",
+  uuid: "876E1F2C-8FD2-4E93-803D-55F182BDA009"}]

data/config/commands/Markdown.rb

@@ -0,0 +1,194 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n$: << ENV['TM_SUPPORT_PATH'] + '/lib'\nrequire 'escape'\ndef esc(str)\n  e_sn(str).gsub(/\\}/, '\\\\}') # escaping inside a placeholder\nend\n\ns = STDIN.read\nif s.empty? then\n  print \"**$1**\"\nelsif s =~ /^\\*{2}(.*)\\*{2}$/ then\n  print \"${1:\#{esc $1}}\"\nelsif ENV.has_key? 'TM_SELECTED_TEXT'\n  print \"${1:**\#{esc s}**}\"\nelse\n  print \"**\#{e_sn s}**\"\nend",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "@b",
+  name: "Bold",
+  output: "insertAsSnippet",
+  scope: "text.html.markdown -meta.disable-markdown",
+  uuid: "31614C02-1FED-4644-9518-2C2DEF0D7A2C"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\n$: << ENV['TM_BUNDLE_SUPPORT']\n$: << ENV['TM_SUPPORT_PATH']\n\nrequire 'lib/markdown'\nrequire 'lib/escape'\n\n# get the list itself\nlisttxt = $stdin.read()\nlist = Markdown::List.parse(listtxt)\n\n# now we need to figure out where we were when we hit enter\noffsetline = ENV['TM_LINE_NUMBER'].to_i() - ENV['TM_INPUT_START_LINE'].to_i()\nindex = ENV['TM_LINE_INDEX'].to_i()\n\nlist.get_entry(offsetline) do |e, l, n|\n\tl.numbered = !l.numbered\nend\nprint list.to_s()\n",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "^*",
+  name: "Change Style",
+  output: "replaceSelectedText",
+  scope: "text.html.markdown markup.list",
+  uuid: "39A74FF2-46EF-4178-9E3A-7D4DB3968E05"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "InsertFormatHeader.rb|MultiMarkdown.pl|\"${TM_SMARTYPANTS:-SmartyPants.pl}\"",
+  fallbackInput: "document",
+  input: "selection",
+  keyEquivalent: "^H",
+  name: "Convert Document / Selection to HTML",
+  output: "openAsNewDocument",
+  scope: "text.html.markdown.multimarkdown",
+  uuid: "9F73CBC1-E9C0-41A4-891F-B2879A1852F7"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# This command works well when you use the TextMate service from a \n# web-log editor like Ecto or MarsEdit.  You can write in markdown\n# and then convert back to html before save and close.\n\nHTML4=$([ -n \"$TM_XHTML\" ] || echo '--html4tags')\n\"${TM_MARKDOWN:-Markdown.pl}\" $HTML4|\"${TM_SMARTYPANTS:-SmartyPants.pl}\"|perl -pe '\n\t# make <h1>Header</h1> into <h1 id=\"header\">Header</h1>\n\t# so that we can link to page#header\n\tif(($tag, $title) = /<(h[1-6])>(.*?)<\\/\\1>/) {\n\t\t$_ = $title;\n\t\ts/<[^>]+>|&\\w+;//g;\t# remove tag and entities\n\t\ts/[^-_ \\/\\w]//g;\t\t# remove all but word and separators\n\t\ts/[-_ \\/]+/_/g;\t\t# collapse all separators into _\n\t\t$_ = \"<$tag id=\\\"\" . (lc $_) . \"\\\">$title</$tag>\\n\";\n\t}'\n",
+  fallbackInput: "document",
+  input: "selection",
+  keyEquivalent: "^H",
+  name: "Convert Document / Selection to HTML",
+  output: "replaceSelectedText",
+  scope: "text.html.markdown",
+  uuid: "966B0E57-799A-4B91-84B4-75695A78F7B8"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "InsertFormatHeader.rb|MultiMarkdown.pl|SmartyPants.pl|xsltproc -novalid -nonet \"$TM_BUNDLE_SUPPORT/xhtml2article.xslt\"  -",
+  fallbackInput: "document",
+  input: "selection",
+  name: "Convert Document / Selection to LaTeX",
+  output: "openAsNewDocument",
+  scope: "text.html.markdown.multimarkdown",
+  uuid: "67EB96A4-4213-42C9-9C47-B886A4B8AC93"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "InsertFormatHeader.rb|MultiMarkdown.pl|SmartyPants.pl|xsltproc -novalid -nonet \"$TM_BUNDLE_SUPPORT/xhtml2memoir.xslt\" -",
+  fallbackInput: "document",
+  input: "selection",
+  name: "Convert Document / Selection to LaTeX (Memoir)",
+  output: "openAsNewDocument",
+  scope: "text.html.markdown.multimarkdown",
+  uuid: "3BAE5ECF-9006-43D0-9AEB-28FAFE526840"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# first figure out a name for the result\nNAME=\"${TM_FILENAME:-untitled}\"\nBASENAME=\"${NAME%.*}\"\nDST=\"/tmp/$BASENAME\"\n\nInsertFormatHeader.rb|MultiMarkdown.pl|SmartyPants.pl|\"${TM_RUBY:-ruby}\" >\"$DST.html\" -KU -pe '$_.gsub!(/[^\\x00-\\x7F]/) { |ch| \"&#\#{ch.unpack(\"U\")[0]};\" }'\n\n# show the generated HTML file\ncat \"$DST.html\"\n\n# convert to PDF with htmldoc\nrequire_cmd htmldoc\nhtmldoc -f \"$DST.pdf\" --header \"\" --footer \"\" --webpage \"$DST.html\"\n\n# open in the users PDF viewer (falling back on Preview)\nviewer=$(find_app \"${TM_PDF_VIEWER:-Preview.app}\")\nif [ $? = 0 ];\n\tthen open -a \"$viewer\" \"$DST.pdf\"\n\telse echo \"Could not find your PDF viewer: ‘${TM_PDF_VIEWER:-Preview.app}’\"\nfi\n",
+  fallbackInput: "document",
+  input: "selection",
+  name: "Convert Document / Selection to PDF",
+  output: "showAsHTML",
+  scope: "text.html.markdown.multimarkdown",
+  uuid: "DB5085DA-3E95-4020-8521-C9702168F160"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "# first figure out a name for the result\nNAME=\"${TM_FILENAME:-untitled}\"\nBASENAME=\"${NAME%.*}\"\nDST=\"/tmp/$BASENAME\"\n\nInsertFormatHeader.rb|MultiMarkdown.pl|SmartyPants.pl >\"$DST.html\"\n\n# textutil is included with Tiger\nrequire_cmd textutil\ntextutil -convert rtf -extension rtf -font Times -fontsize 11 \"$DST.html\"\n\nopen -a TextEdit.app \"$DST.rtf\"\n",
+  fallbackInput: "document",
+  input: "selection",
+  name: "Convert Document / Selection to RTF",
+  output: "discard",
+  scope: "text.html.markdown.multimarkdown",
+  uuid: "D9118E94-4E23-4B75-88D7-6BFEBAA70D1B"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "MultiMarkdown.pl|\"${TM_SMARTYPANTS:-SmartyPants.pl}\" > \"${TM_DIRECTORY:-/tmp}\"/output.html\nopen \"${TM_DIRECTORY:-/tmp}\"/output.html",
+  fallbackInput: "document",
+  input: "selection",
+  keyEquivalent: "^@p",
+  name: "Generate Output and Open in Browser",
+  output: "discard",
+  scope: "text.html.markdown.multimarkdown",
+  uuid: "351451DE-C1A4-4A36-A563-99AF761D026B"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n$: << ENV['TM_SUPPORT_PATH'] + '/lib'\nrequire 'escape'\ndef esc(str)\n  e_sn(str).gsub(/\\}/, '\\\\}') # escaping inside a placeholder\nend\n\ns = STDIN.read\nif s.empty? then\n  print \"*$1*\"\nelsif s =~ /^(\\*+)(.*[^\\*])\\*+$/ then\n  m, s = $1, $2\n  case m.length\n    when 1 then print \"${1:\#{esc s}}\"\n    when 2 then print \"${1:***\#{esc s}***}\"\n    else print \"${1:**\#{esc s}**}\"\n  end\nelsif ENV.has_key? 'TM_SELECTED_TEXT'\n  print \"${1:*\#{esc s}*}\"\nelse\n  print \"*\#{e_sn s}*\"\nend",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "@i",
+  name: "Italic",
+  output: "insertAsSnippet",
+  scope: "text.html.markdown -meta.disable-markdown",
+  uuid: "F56525A1-C879-4A7C-9584-4DB28AFC58C2"},
+ {beforeRunningCommand: "nop",
+  captureFormatString: "$3",
+  capturePattern: "^([^:]*):([^:]*):(.*)$",
+  command: 
+   "#!/usr/bin/env ruby -wKU\n\nrequire 'jcode'\n\n# Split document into lines. Get current line number minus one for\n# previous, minus another for ruby being 0 based.\nlines = STDIN.readlines\nline  = ENV['TM_LINE_NUMBER'].to_i - 2\n\n# Get length of previous line, using jlength for unicode\nlength = lines[line].rstrip.jlength\n\n# Print same number of =\nlength.times { print \"=\" }\n",
+  fileCaptureRegister: "1",
+  input: "document",
+  lineCaptureRegister: "2",
+  name: "Level 1 [setext]",
+  output: "afterSelectedText",
+  scope: "text.html.markdown",
+  tabTrigger: "=",
+  uuid: "F3A754C3-CE6B-11D9-9C17-000A95C0F626"},
+ {beforeRunningCommand: "nop",
+  captureFormatString: "$3",
+  capturePattern: "^([^:]*):([^:]*):(.*)$",
+  command: 
+   "#!/usr/bin/env ruby -wKU\n\nrequire 'jcode'\n\n# Split document into lines. Get current line number minus one for\n# previous, minus another for ruby being 0 based.\nlines = STDIN.readlines\nline  = ENV['TM_LINE_NUMBER'].to_i - 2\n\n# Get length of previous line, using jlength for unicode\nlength = lines[line].rstrip.jlength\n\n# Print same number of -\nlength.times { print \"-\" }\n",
+  fileCaptureRegister: "1",
+  input: "document",
+  lineCaptureRegister: "2",
+  name: "Level 2 [setext]",
+  output: "afterSelectedText",
+  scope: "text.html.markdown",
+  tabTrigger: "-",
+  uuid: "724FCFF6-CE6B-11D9-9C17-000A95C0F626"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\n$: << ENV['TM_BUNDLE_SUPPORT']\n$: << ENV['TM_SUPPORT_PATH']\n\nrequire 'lib/markdown'\nrequire 'lib/escape'\n\n# get the list itself\nlisttxt = $stdin.read()\nlist = Markdown::List.parse(listtxt)\n\n# now we need to figure out where we were when we hit enter\noffsetline = ENV['TM_LINE_NUMBER'].to_i() - ENV['TM_INPUT_START_LINE'].to_i()\nindex = ENV['TM_LINE_INDEX'].to_i()\n\nlist.break(offsetline, index) { |l| e_sn(l) }\nprint list.to_s()\n",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "",
+  name: "New Item",
+  output: "insertAsSnippet",
+  scope: "text.html.markdown markup.list",
+  uuid: "622F0B69-EB98-4EB9-8DC8-2AC56FF2501E"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\n$: << ENV['TM_BUNDLE_SUPPORT']\n$: << ENV['TM_SUPPORT_PATH']\n\nrequire 'lib/markdown'\nrequire 'lib/escape'\n\n# get the list itself\nlisttxt = $stdin.read()\nlist = Markdown::List.parse(listtxt)\n\n# now we need to figure out where we were when we hit enter\noffsetline = ENV['TM_LINE_NUMBER'].to_i() - ENV['TM_INPUT_START_LINE'].to_i()\nindex = ENV['TM_LINE_INDEX'].to_i()\n\nlist.break(offsetline, index, \"$0\", true) { |l| e_sn(l) }\nprint list.to_s()\n",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "$",
+  name: "New Subitem",
+  output: "insertAsSnippet",
+  scope: "text.html.markdown markup.list",
+  uuid: "000B399B-FB71-49EF-B799-A1200A3865AB"},
+ {beforeRunningCommand: "nop",
+  command: 
+   ". \"$TM_SUPPORT_PATH/lib/webpreview.sh\"\nhtml_header \"Markdown Preview\" \"${TM_FILENAME:-}\"\n\nif [[ -f \"$TM_FILEPATH\" ]]; then\n  echo \"<base href='tm-file://${TM_FILEPATH// /%20}'>\"\nfi\n\n# Convert to html then make one of the html tags above caret \n# into a link that we scroll down to\n\"${TM_MARKDOWN:-Markdown.pl}\"|\"${TM_SMARTYPANTS:-SmartyPants.pl}\"|${TM_RUBY:-ruby} -e '\nlines = STDIN.read.split(\"\\n\")\nn = [ENV[\"TM_LINE_NUMBER\"].to_i, lines.length].min - 7\n\nwhile n > 0 && !lines[n].match(/<(h\\d|p|ul|li|blockquote|pre|div|img|code|table|tr)>/i)\n  n -= 1\nend\n\nif n > 0 && m = lines[n].match(/<(h\\d|p|ul|li|blockquote|pre|div|img|code|table|tr)>(.*)$/i)\n  lines[n] = \"<\#{m[1]} id=\\\"scroll_to_here\\\" >\#{m[2]}\"\nend\n\nputs lines.join(\"\\n\")\nputs \"\\n<script>window.location.hash = \\\"scroll_to_here\\\";</script>\"\n'\nhtml_footer",
+  input: "document",
+  keyEquivalent: "^~@p",
+  name: "Preview",
+  output: "showAsHTML",
+  scope: "text.html.markdown",
+  uuid: "B52DEA16-8480-11D9-BE59-000D93B3A10E"},
+ {beforeRunningCommand: "nop",
+  bundleUUID: "D99E8C0C-792F-11D9-A212-000D93B3A10E",
+  command: 
+   ". \"$TM_SUPPORT_PATH/lib/webpreview.sh\"\n\nif [[ -z $TM_FILENAME ]]\n  then title=\"Markdown as HTML\"\n  else title=\"${TM_FILENAME%.*}\"\nfi\n\nhtml_header \"$title\" \"MultiMarkdown\"\n\nif [[ -f \"$TM_FILEPATH\" ]]; then\n  echo \"<base href='tm-file://${TM_FILEPATH// /%20}'>\"\nfi\n\nMultiMarkdown.pl|\"${TM_SMARTYPANTS:-SmartyPants.pl}\"\nhtml_footer",
+  fallbackInput: "document",
+  input: "selection",
+  keyEquivalent: "^~@p",
+  name: "Preview",
+  output: "showAsHTML",
+  scope: "text.html.markdown.multimarkdown",
+  uuid: "7CCF064C-BC8F-437B-A339-0E2156D8B2C3"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\n$: << ENV['TM_BUNDLE_SUPPORT']\n$: << ENV['TM_SUPPORT_PATH']\n\nrequire 'lib/markdown'\nrequire 'lib/escape'\n\n# get the list itself\nlisttxt = $stdin.read()\nlist = Markdown::List.parse(listtxt)\n\nprint list.to_s()\n",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "^{",
+  name: "Reformat",
+  output: "replaceSelectedText",
+  scope: "text.html.markdown markup.list",
+  uuid: "5EFA9FF4-2246-4AF4-ABD6-2B7ADB4E9B80"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\n$: << ENV['TM_BUNDLE_SUPPORT']\n$: << ENV['TM_SUPPORT_PATH']\n\nrequire 'lib/markdown'\nrequire 'lib/escape'\n\n# get the list itself\nlisttxt = $stdin.read()\nlist = Markdown::List.parse(listtxt)\n\n# now we need to figure out where we were when we hit enter\noffsetline = ENV['TM_LINE_NUMBER'].to_i() - ENV['TM_INPUT_START_LINE'].to_i()\nindex = ENV['TM_LINE_INDEX'].to_i()\n\nlist.select(offsetline) { |l| e_sn(l) }\nprint list.to_s()\n",
+  fallbackInput: "scope",
+  input: "selection",
+  keyEquivalent: "@",
+  name: "Select Item",
+  output: "insertAsSnippet",
+  scope: "text.html.markdown markup.list",
+  uuid: "ADEF8E57-BF21-487A-9115-E1D1146142CD"},
+ {beforeRunningCommand: "nop",
+  bundleUUID: "D99E8C0C-792F-11D9-A212-000D93B3A10E",
+  command: 
+   ". \"$TM_SUPPORT_PATH/lib/webpreview.sh\"\nhtml_header \"Markdown Cheat Sheet\"\nMarkdown.pl \"$TM_BUNDLE_SUPPORT/help.markdown\"\nhtml_footer",
+  input: "none",
+  keyEquivalent: "^h",
+  name: "Syntax Cheat Sheet",
+  output: "showAsHTML",
+  scope: "text.html.markdown",
+  uuid: "FE31CF79-5F04-4FB6-B5CE-70BC781FF8B5"}]

data/config/commands/Math.rb

@@ -0,0 +1,79 @@
+# Encoding: UTF-8
+
+[{beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\n\nprint \" = \" + $stdin.read.gsub(/[$€£]/, '').scan(/((?:\\b|-)[0-9]+(?:\\.[0-9]+)?)\\b/).inject(0.0) { |t,s| t + s[0].to_f() }.to_s.sub(/.0+\\z/, '')",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "^C",
+  name: "Add Numbers in Line / Selection",
+  output: "afterSelectedText",
+  uuid: "D6EEB6EA-77E9-11D9-B36F-000D93589AF6"},
+ {beforeRunningCommand: "nop",
+  command: "bc <<<\"obase=16;$(cat)\"|tr -d \\\\n",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "^C",
+  name: "Decimal to Hex",
+  output: "replaceSelectedText",
+  uuid: "6E8B4CDA-07CD-4BFA-ABFE-5ABA14F35B8A"},
+ {beforeRunningCommand: "nop",
+  command: "bc <<<\"obase=8;$(cat)\"|tr -d \\\\n",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "^C",
+  name: "Decimal to Octal",
+  output: "replaceSelectedText",
+  uuid: "93992270-EA57-4AE0-BF91-16C9110A41E1"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "printf \" = %s\" `{ tr -d ,; echo; } | bc -l`| perl -pe 's/(\\.[^0]+)0+$|\\.0+$/$1/'",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "^C",
+  name: "Evaluate Line / Selection",
+  output: "afterSelectedText",
+  uuid: "93A395CC-77E8-11D9-B5A8-000D93589AF6"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "printf \"%s\" `{ tr -d ,; echo; } | bc -l`| perl -pe 's/(\\.[^0]+)0+$|\\.0+$/$1/'",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "^C",
+  name: "Evaluate and Replace Expression",
+  output: "replaceSelectedText",
+  uuid: "D1DFE75D-EAAD-4662-8F1F-F5556402054B"},
+ {beforeRunningCommand: "nop",
+  command: "printf \"%.0f\" `{ tr -d ,; echo; } | bc -l`",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "^C",
+  name: "Evaluate and Replace Expression (rounded)",
+  output: "replaceSelectedText",
+  uuid: "A8369DD4-4424-4A64-B0B1-FB8BD7D8E02C"},
+ {beforeRunningCommand: "nop",
+  command: "bc <<<\"ibase=16;$(tr '[a-z]' '[A-Z]')\"|tr -d \\\\n",
+  fallbackInput: "word",
+  input: "selection",
+  keyEquivalent: "^C",
+  name: "Hex to Decimal",
+  output: "replaceSelectedText",
+  uuid: "C688B837-D48A-4088-9374-F93E7B4CCD3C"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "#!/usr/bin/env ruby\nrequire 'cgi'\nrequire 'net/http'\nrequire ENV['TM_SUPPORT_PATH'] + '/lib/exit_codes'\nrequire ENV['TM_SUPPORT_PATH'] + '/lib/progress.rb'\n\nquery = CGI::escape(STDIN.read)\nabort if query.empty?\n\nTextMate.call_with_progress(:message => 'Querying Google…') do\n  response = Net::HTTP.get('www.google.com', '/search?q=' + query)\n  if response =~ /<b>.*? = (.*?)<\\/b>/\n    answer = $1\n    answer.gsub!(/<sup>(.+?)<\\/sup>/, '^\\1') # Prefix exponents\n    answer.gsub!(/<.+?>/, '')\n    answer.gsub!('&#215;', '×')\n    answer.gsub!(/(\\d+) (?=\\d{3})/, '\\1,') # Turn 10 000 into 10,000\n    print answer\n  else\n    TextMate.exit_show_tool_tip 'Invalid calculation'\n  end\nend",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "^C",
+  name: "Send Line / Selection to Google Calculator",
+  output: "replaceSelectedText",
+  uuid: "BA9536B4-5A7E-46D2-A268-E0ADAB9782BC"},
+ {beforeRunningCommand: "nop",
+  command: 
+   "printf \" = %s\" `{ tr -d ,|tr -cs '[0-9.]' ' '|perl -pe 's/([0-9.]+) (?=[0-9.])/$1-/g'; echo; } | bc -l`| perl -pe 's/(\\.[^0]+)0+$|\\.0+$/$1/'",
+  fallbackInput: "line",
+  input: "selection",
+  keyEquivalent: "^C",
+  name: "Subtract Numbers in Line / Selection",
+  output: "afterSelectedText",
+  uuid: "F1541E0F-77EB-11D9-B807-000D93589AF6"}]