From 7a6bb0f05e349068b0a89514f1da33d6d7de30a9 Mon Sep 17 00:00:00 2001 From: Alexander Sulfrian Date: Tue, 24 Apr 2012 23:29:38 +0200 Subject: emacs.d/lisp/yasnippet: added yasnippet --- .../emacs-lisp-mode/x-file.read-lines.yasnippet | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100755 emacs.d/lisp/yasnippet/snippets/emacs-lisp-mode/x-file.read-lines.yasnippet (limited to 'emacs.d/lisp/yasnippet/snippets/emacs-lisp-mode/x-file.read-lines.yasnippet') diff --git a/emacs.d/lisp/yasnippet/snippets/emacs-lisp-mode/x-file.read-lines.yasnippet b/emacs.d/lisp/yasnippet/snippets/emacs-lisp-mode/x-file.read-lines.yasnippet new file mode 100755 index 0000000..015c0f2 --- /dev/null +++ b/emacs.d/lisp/yasnippet/snippets/emacs-lisp-mode/x-file.read-lines.yasnippet @@ -0,0 +1,17 @@ +#contributor: Xah Lee (XahLee.org) +#name: read lines of a 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 -- cgit v1.2.3