Tue Jun 28 08:04:14 UTC 2011  pix@kepibu.org
  * Don't consider a page updated if the last-known good is the same as the current version
diff -rN -u old-claki/claki.lisp new-claki/claki.lisp
--- old-claki/claki.lisp	2013-11-10 20:11:07.000000000 +0000
+++ new-claki/claki.lisp	2013-11-10 20:11:07.000000000 +0000
@@ -57,6 +57,8 @@
                              ("#footer > b" . #t(list ?b))) page)
         (let ((current-version (oh-ducks.traversal:element-content b)))
           (format t "; Page ~s modified, now at version ~a.~%" page-url current-version)
+          (when (string= (gethash page-url *last-known-good*) current-version)
+            (return-from parse-page nil))
           (pushnew (list page-url current-version) *updated-pages* :test #'equal)
           (dolist (link a)
             (let ((url (oh-ducks.traversal:element-attribute :href link)))