added about 10 elisp keywords. work in progress to add more.

snippets/emacs-lisp-mode/.read_me

@@ -1,4 +1,7 @@
-TITLE: Emacs Idiom Template Set. Version 1. 2009-02-22
+TITLE: Emacs Idiom Template Set.
+
+Version 1.1. 2010-08-05
+Version 1. 2009-02-22
 
 DESCRIPTION: Some useful templates for emacs lisp. This template set is based on useful elisp idioms on common tasks.
 

snippets/emacs-lisp-mode/and.yasnippet

@@ -0,0 +1,4 @@
+#contributor: Xah Lee (XahLee.org)
+#name: and
+# --
+(and $0)

snippets/emacs-lisp-mode/autoload.yasnippet

@@ -0,0 +1,5 @@
+#contributor: Xah Lee (XahLee.org)
+#name: autoload
+# --
+(autoload 'FUNCNAME$0 "FILENAME" & "DOCSTRING" INTERACTIVE TYPE)
+

snippets/emacs-lisp-mode/car.yasnippet

@@ -0,0 +1,4 @@
+#contributor: Xah Lee (XahLee.org)
+#name: car
+# --
+(car $0)

snippets/emacs-lisp-mode/define-key.yasnippet

@@ -0,0 +1,4 @@
+#contributor: Xah Lee (XahLee.org)
+#name: define-key
+# --
+(define-key KEYMAPNAME$0 (kbd "M-b") 'FUNCNAME)

snippets/emacs-lisp-mode/defun.yasnippet

@@ -1,11 +1,10 @@
-#name : function template
+#contributor: Xah Lee (XahLee.org)
-#contributor : Xah Lee
+#name: defun
 # --
 (defun $1 ()
-  "thisandthat."
+  "DOCSTRING"
   (interactive)
   (let (var1)
     (setq var1 some)
     $0
-  )
+  ))
-)

snippets/emacs-lisp-mode/defvar.yasnippet

@@ -0,0 +1,4 @@
+#contributor: Xah Lee (XahLee.org)
+#name: defvar
+# --
+(defvar SYMBOL & INITVALUE "DOCSTRING")

snippets/emacs-lisp-mode/grabthing

@@ -1,4 +0,0 @@
-#name : grab word under cursor
-#contributor : Xah Lee
-# --
-(setq $0 (thing-at-point 'symbol))

snippets/emacs-lisp-mode/if.yasnippet

@@ -0,0 +1,4 @@
+#contributor: Xah Lee (XahLee.org)
+#name: if
+# --
+(if $0)

snippets/emacs-lisp-mode/let.yasnippet

@@ -0,0 +1,6 @@
+#contributor: Xah Lee (XahLee.org)
+#name: let
+# --
+(let ($1 )
+ $0
+)

snippets/emacs-lisp-mode/not.yasnippet

@@ -0,0 +1,4 @@
+#contributor: Xah Lee (XahLee.org)
+#name: not
+# --
+(not $0 )

snippets/emacs-lisp-mode/or.yasnippet

@@ -0,0 +1,4 @@
+#contributor: Xah Lee (XahLee.org)
+#name: or
+# --
+(or $0 )

snippets/emacs-lisp-mode/quote.yasnippet

@@ -0,0 +1,5 @@
+#contributor: Xah Lee (XahLee.org)
+#name: '(...)
+#key: '
+# --
+'($0 )

snippets/emacs-lisp-mode/setq.yasnippet

@@ -0,0 +1,4 @@
+#contributor: Xah Lee (XahLee.org)
+#name: setq
+# --
+(setq $0 )

snippets/emacs-lisp-mode/x-dired.process_marked.yasnippet

@@ -1,5 +1,5 @@
-#name : process marked files in dired
+#contributor: Xah Lee (XahLee.org)
-#contributor : Xah Lee
+#name: process marked files in dired
 # --
 ;; idiom for processing a list of files in dired's marked files
  

snippets/emacs-lisp-mode/x-file.process.yasnippet

@@ -1,5 +1,5 @@
-#name : a function that process a file
+#contributor: Xah Lee (XahLee.org)
-#contributor : Xah Lee
+#name: a function that process a file
 # --
 (defun doThisFile (fpath)
   "Process the file at path FPATH ..."

snippets/emacs-lisp-mode/x-file.read-lines.yasnippet

@@ -1,5 +1,5 @@
-#name : read lines of a file
+#contributor: Xah Lee (XahLee.org)
-#contributor : Xah Lee
+#name: read lines of a file
 # --
 (defun read-lines (filePath)
   "Return a list of lines in FILEPATH."

snippets/emacs-lisp-mode/x-find-replace.yasnippet

@@ -1,5 +1,5 @@
-#name : find and replace on region
+#contributor: Xah Lee (XahLee.org)
-#contributor : Xah Lee
+#name: find and replace on region
 # --
 (defun replace-html-chars-region (start end)
   "Replace “<” to “&lt;” and other chars in HTML.

snippets/emacs-lisp-mode/x-grabstring.yasnippet

@@ -1,4 +1,4 @@
-#name : grab buffer substring
+#contributor: Xah Lee (XahLee.org)
-#contributor : Xah Lee
+#name: grab buffer substring
 # --
 (setq $0 (buffer-substring-no-properties myStartPos myEndPos))

snippets/emacs-lisp-mode/x-grabthing.yasnippet

@@ -0,0 +1,4 @@
+#contributor: Xah Lee (XahLee.org)
+#name: grab word under cursor
+# --
+(setq $0 (thing-at-point 'symbol))

snippets/emacs-lisp-mode/x-traverse_dir.yasnippet

@@ -1,5 +1,5 @@
-#name : traversing a directory
+#name: traversing a directory
-#contributor : Xah Lee
+#contributor: Xah Lee (XahLee.org)
 # --
 ;; apply a function to all files in a dir
 (require 'find-lisp)

snippets/emacs-lisp-mode/x-word-or-region.yasnippet

@@ -1,5 +1,5 @@
-#name : Command that works on region or word
+#contributor: Xah Lee (XahLee.org)
-#contributor : Xah Lee
+#name: Command that works on region or word
 # --
 ;; example of a command that works on current word or text selection
 (defun down-case-word-or-region ()