Add a LAST-MODIFICATION field to class JOURNAL-ENTRY.

darcs-hash:1663026972190249829b9f43c0b20e5f56fb9823

1 files changed, 4 insertions, 0 deletions

diff --git a/journal.lisp b/journal.lisp
index 0c8156e..841faee 100755
--- a/journal.lisp
+++ b/journal.lisp
@@ -78,6 +78,10 @@
    (date :type (integer 0)
          :accessor date-of
          :initarg :date)
+   (last-modification :type (or null (integer 0))
+                      :accessor last-modification-of
+                      :initarg :last-modification
+                      :initform nil)
    (body :type string
          :accessor body-of
          :initarg :body