Permalink
Browse files

first commit

  • Loading branch information...
0 parents commit a3495218c8107a77e075f6b72f54dc1991a4e300 @taoeffect committed Jul 8, 2010
@@ -0,0 +1,31 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>beforeRunningCommand</key>
+ <string>nop</string>
+ <key>command</key>
+ <string>#. "$TM_SUPPORT_PATH/lib/webpreview.sh"
+#html_header "Documentation for Word" "newLISP"
+read KEYWORD
+echo "&lt;ul&gt;"
+echo "&lt;li&gt;&lt;a href=\"http://newlisp.org/downloads/newlisp_manual.html#$TM_CURRENT_WORD\"&gt;$TM_CURRENT_WORD&lt;/a&gt;&lt;/li&gt;"
+#file:///usr/share/doc/newlisp/newlisp_manual.html#$TM_CURRENT_WORD
+echo "&lt;/ul&gt;"
+#html_footer</string>
+ <key>fallbackInput</key>
+ <string>word</string>
+ <key>input</key>
+ <string>selection</string>
+ <key>keyEquivalent</key>
+ <string>^h</string>
+ <key>name</key>
+ <string>Documentation for Word</string>
+ <key>output</key>
+ <string>showAsHTML</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>uuid</key>
+ <string>88778060-82EC-43A6-AA6C-4132841A4497</string>
+</dict>
+</plist>
@@ -0,0 +1,24 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>beforeRunningCommand</key>
+ <string>nop</string>
+ <key>command</key>
+ <string>newlisp</string>
+ <key>fallbackInput</key>
+ <string>line</string>
+ <key>input</key>
+ <string>selection</string>
+ <key>keyEquivalent</key>
+ <string>~@r</string>
+ <key>name</key>
+ <string>Run (Current Lines)</string>
+ <key>output</key>
+ <string>showAsTooltip</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>uuid</key>
+ <string>E23924BF-8A47-4F16-B23A-5BF44686E727</string>
+</dict>
+</plist>
@@ -0,0 +1,47 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>beforeRunningCommand</key>
+ <string>nop</string>
+ <key>command</key>
+ <string>#!/bin/bash
+[[ -z "$TM_FILEPATH" ]] &amp;&amp; TM_TMPFILE=$(mktemp -t pythonInTerm)
+: "${TM_FILEPATH:=$TM_TMPFILE}"; cat &gt;"$TM_FILEPATH"
+
+: ${TM_LUA:=newlisp}
+require_cmd "$TM_LUA"
+
+esc () {
+STR="$1" ruby &lt;&lt;"RUBY"
+ str = ENV['STR']
+ str = str.gsub(/'/, "'\\\\''")
+ str = str.gsub(/[\\"]/, '\\\\\\0')
+ print "'#{str}'"
+RUBY
+}
+
+osascript &lt;&lt;- APPLESCRIPT
+ tell app "Terminal"
+ launch
+ activate
+ do script "clear; cd $(esc "${TM_DIRECTORY}"); $(esc "${TM_LUA}") $(esc "${TM_FILEPATH}"); rm -f $(esc "${TM_TMPFILE}")"
+ set position of first window to { 100, 100 }
+ end tell
+APPLESCRIPT
+
+</string>
+ <key>input</key>
+ <string>document</string>
+ <key>keyEquivalent</key>
+ <string>@r</string>
+ <key>name</key>
+ <string>Run (Terminal)</string>
+ <key>output</key>
+ <string>showAsTooltip</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>uuid</key>
+ <string>AC0513B0-6967-49E9-9BE9-E73BD2009028</string>
+</dict>
+</plist>
@@ -0,0 +1,17 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>name</key>
+ <string>Symbol List prevent</string>
+ <key>scope</key>
+ <string>entity.name.function.lisp</string>
+ <key>settings</key>
+ <dict>
+ <key>showInSymbolList</key>
+ <integer>0</integer>
+ </dict>
+ <key>uuid</key>
+ <string>C8984C3E-C0D2-4E6B-87F4-C7FC9F99DA0C</string>
+</dict>
+</plist>
@@ -0,0 +1,24 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>name</key>
+ <string>Symbol List</string>
+ <key>scope</key>
+ <string>entity.name.functiondef.lisp, comment.line.marker.lisp, comment.line.todo.lisp</string>
+ <key>settings</key>
+ <dict>
+ <key>showInSymbolList</key>
+ <integer>1</integer>
+ <key>symbolTransformation</key>
+ <string>
+ s/;+\s+mark -/----------/;
+ s/;+\s+mark\s+(.*)/\t\t\t\t• $1/;
+ s/;+\s+\!(.*)/\t\t\t\t• $1/;
+ s/;.*(TODO:.*)/\t$1/;
+ </string>
+ </dict>
+ <key>uuid</key>
+ <string>A9682BC3-BF72-49B1-8A3C-60E77B93776E</string>
+</dict>
+</plist>
@@ -0,0 +1,11 @@
+h1. Installation
+
+pre. cd ~/Library/Application\ Support/TextMate/Bundles
+git clone http://github.com/taoeffect/newLISP.tmbundle.git
+osascript -e 'tell app "TextMate" to reload bundles'
+
+h2. Using hg-git
+
+Same as above but use:
+
+pre. hg clone git://github.com/taoeffect/newLISP.tmbundle.git
@@ -0,0 +1,16 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(and ($1)$2)</string>
+ <key>name</key>
+ <string>and</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>and</string>
+ <key>uuid</key>
+ <string>CB006B51-050C-4E63-9CF9-86DCA939334C</string>
+</dict>
+</plist>
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(begin
+ ($0)
+)</string>
+ <key>name</key>
+ <string>begin</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>begin</string>
+ <key>uuid</key>
+ <string>0D2943BD-02E1-4EE6-AD6A-B0273346400B</string>
+</dict>
+</plist>
@@ -0,0 +1,16 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(constant '${1:var} ${2:value})</string>
+ <key>name</key>
+ <string>const</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>const</string>
+ <key>uuid</key>
+ <string>7469E1EA-7BB5-46DC-963E-2D4BF136B9F2</string>
+</dict>
+</plist>
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(define (${1:func-name} ${2:parameters})
+ ($0)
+)</string>
+ <key>name</key>
+ <string>define</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>def</string>
+ <key>uuid</key>
+ <string>B330D8E4-A85F-44DE-A52C-34260D7701F9</string>
+</dict>
+</plist>
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(define-macro (${1:func-name} ${2:parameters})
+ ($0)
+)</string>
+ <key>name</key>
+ <string>define-macro</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>defm</string>
+ <key>uuid</key>
+ <string>76427900-BF18-400E-9D0B-61AA73A705CE</string>
+</dict>
+</plist>
@@ -0,0 +1,17 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>
+;; </string>
+ <key>keyEquivalent</key>
+ <string></string>
+ <key>name</key>
+ <string>doc comment</string>
+ <key>scope</key>
+ <string>comment.doc.lisp</string>
+ <key>uuid</key>
+ <string>EED0D3B0-A2AD-44D9-8A01-AA19E402FF3A</string>
+</dict>
+</plist>
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(dolist (${1:item} ${2:list})
+ ($0)
+)</string>
+ <key>name</key>
+ <string>dolist</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>dolist</string>
+ <key>uuid</key>
+ <string>457F3FAD-7B8D-443D-B2EA-34842F7057D7</string>
+</dict>
+</plist>
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(dotimes (${1:i} ${2:10})
+ ($0)
+)</string>
+ <key>name</key>
+ <string>dotimes</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>dotimes</string>
+ <key>uuid</key>
+ <string>F66BB831-AE19-4C89-9CCC-C397F2F0DF2D</string>
+</dict>
+</plist>
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(for (${1:i} ${2:0} ${3:10})
+ ($0)
+)</string>
+ <key>name</key>
+ <string>for</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>for</string>
+ <key>uuid</key>
+ <string>FA8FF4D0-48F1-420C-A3CA-17A0B86F21A2</string>
+</dict>
+</plist>
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(if (${1:cond} $2)
+ ($0)
+)</string>
+ <key>name</key>
+ <string>if</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>if</string>
+ <key>uuid</key>
+ <string>014A419E-095D-4B3B-98A2-488A973B364B</string>
+</dict>
+</plist>
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(if-not (${1:cond} $2)
+ ($0)
+)</string>
+ <key>name</key>
+ <string>if-not</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>ifn</string>
+ <key>uuid</key>
+ <string>07D2D8EA-9570-4BF9-8E86-C760B70BAEAD</string>
+</dict>
+</plist>
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(let (${1:var} ${2:val})
+ ($0)
+)</string>
+ <key>name</key>
+ <string>let</string>
+ <key>scope</key>
+ <string>source.newlisp</string>
+ <key>tabTrigger</key>
+ <string>let</string>
+ <key>uuid</key>
+ <string>8C9595EA-7821-453D-8CCB-B573D7E39E46</string>
+</dict>
+</plist>
@@ -0,0 +1,12 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+ <key>content</key>
+ <string>(or ($1)$2)</string>
+ <key>name</key>
+ <string>or</string>
+ <key>uuid</key>
+ <string>5EF9CD84-8D0C-4320-B5E0-5193E4659AEF</string>
+</dict>
+</plist>
Oops, something went wrong.

0 comments on commit a349521

Please sign in to comment.