1 # contributor: Xah Lee (XahLee.org)
2 # name: read lines of a file
5 (defun read-lines (filePath)
6 "Return a list of lines in FILEPATH."
8 (insert-file-contents filePath)
10 (buffer-string) "\n" t)) )
15 (message aLine) ; do your stuff here
17 (read-lines "inputFilePath")