summaryrefslogblamecommitdiffstats
path: root/emacs.d/lisp/yasnippet/snippets/emacs-lisp-mode/x-file.read-lines.yasnippet
blob: 015c0f2733fcc99ed862ef485e4d8c1dac689bd5 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
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")
)