From 7bf6712498ad2618bee7bf5b3866fb6da0772339 Mon Sep 17 00:00:00 2001
From: Simeon Simeonov
Date: Thu, 19 Sep 2013 22:27:58 +0200
Subject: All snippets imported, init file polished

---
 .../text-mode/emacs-lisp-mode/file.read-lines           | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 .emacs.d/mysnippets/text-mode/emacs-lisp-mode/file.read-lines

(limited to '.emacs.d/mysnippets/text-mode/emacs-lisp-mode/file.read-lines')

diff --git a/.emacs.d/mysnippets/text-mode/emacs-lisp-mode/file.read-lines b/.emacs.d/mysnippets/text-mode/emacs-lisp-mode/file.read-lines
new file mode 100644
index 0000000..b4a1942
--- /dev/null
+++ b/.emacs.d/mysnippets/text-mode/emacs-lisp-mode/file.read-lines
@@ -0,0 +1,17 @@
+#name : read lines of a file
+#contributor : Xah Lee
+# --
+(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.3