Update for 2015 and newer knowledge

.gitignore

@@ -0,0 +1,52 @@
+
+# Created by https://www.gitignore.io/api/emacs,linux,commonlisp
+
+### Emacs ###
+# -*- mode: gitignore; -*-
+*~
+\#*\#
+/.emacs.desktop
+/.emacs.desktop.lock
+*.elc
+auto-save-list
+tramp
+.\#*
+
+# Org-mode
+.org-id-locations
+*_archive
+
+# flymake-mode
+*_flymake.*
+
+# eshell files
+/eshell/history
+/eshell/lastdir
+
+# elpa packages
+/elpa/
+
+# reftex files
+*.rel
+
+# AUCTeX auto folder
+/auto/
+
+# cask packages
+.cask/
+
+
+### Linux ###
+*~
+
+# KDE directory preferences
+.directory
+
+# Linux trash folder which might appear on any partition or disk
+.Trash-*
+
+
+### CommonLisp ###
+*.FASL
+*.fasl
+*.lisp-temp

LICENSE

@@ -1,4 +1,4 @@
-Copyright (c) 2013, Lily Carpenter
+Copyright (c) 2015, Lily Carpenter
 All rights reserved.
 
 Redistribution and use in source and binary forms, with or without modification,

README.md

@@ -1,6 +0,0 @@
-mailfilter_parse
-================
-
-Simple LISP library to parse a maildir file into a usable structure. Used for my filter-mail repository.
-
-This is my first LISP program and has not yet been cleaned up, be forewarned: Here, there be dragons. (As in really ugly code)

README.org

@@ -0,0 +1,3 @@
+* mailfilter-parse
+
+Simple LISP library to parse a maildir file into a usable structure. I can then easily perform operations on maildir directories using this structure.

mailfilter-parse.asd

@@ -0,0 +1,12 @@
+;;;; mailfilter-parse.asd
+
+(asdf:defsystem #:mailfilter-parse
+  :description "Read mailfilter files and apply the rules to mail messages."
+  :author "Lily Carpenter (azrazalea)"
+  :license "BSD 3-clause"
+  :depends-on (#:cl-ppcre
+               #:alexandria
+               #:mel-base)
+  :serial t
+  :components ((:file "package")
+               (:file "mailfilter-parse")))

parse-mailfilter.lisp

@@ -1,4 +1,4 @@
-;;;;Copyright (c) 2013, Lily Carpenter
+;;;;Copyright (c) 2015, Lily Carpenter
 ;;;;All rights reserved.
 ;;;;
 ;;;;Redistribution and use in source and binary forms, with or without modification,
@@ -26,10 +26,6 @@
 ;;;;(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 ;;;;SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
-(require :asdf)
-(require :sigma)
-(sigma:use-all-sigma)
-
 (defvar *commands* '("to"))
 (defvar *maildir* nil)
 

package.lisp

@@ -0,0 +1,4 @@
+;;;; package.lisp
+
+(defpackage #:mailfilter-parse
+  (:use #:cl))