Add yasnippet.

[gnu-emacs-elpa] / packages / yasnippet / snippets / emacs-lisp-mode / x-file.read-lines.yasnippet

diff --git a/packages/yasnippet/snippets/emacs-lisp-mode/x-file.read-lines.yasnippet b/packages/yasnippet/snippets/emacs-lisp-mode/x-file.read-lines.yasnippet
new file mode 100644 (file)
index 0000000..f85fe4e
--- /dev/null
+++ b/packages/yasnippet/snippets/emacs-lisp-mode/x-file.read-lines.yasnippet
@@ -0,0 +1,18 @@
+# contributor: Xah Lee (XahLee.org)
+# name: read lines of a file
+# key: x-file
+# --
+(defun read-lines (filePath)
+  "Return a list of lines in FILEPATH."
+  (with-temp-buffer
+    (insert-file-contents filePath)
+    (split-string
+     (buffer-string) "\n" t)) )
+
+;; process all lines
+(mapc 
+ (lambda (aLine) 
+   (message aLine) ; do your stuff here
+   )
+ (read-lines "inputFilePath")
+)
\ No newline at end of file