Fix the output, add updated dates

Author: pnathan

content-footer.html

@@ -1,7 +1,7 @@
 
 <center style="font-size: x-small">
 
-  <p>&copy; Paul Nathan 2013,2014</p>
+  <p>&copy; Paul Nathan & others 2013,2014,2015</p>
   <p><a href="https://github.com/pnathan/articulate-common-lisp"> Github source</a> - contributions welcome!</p>
 
 </center>

index.md

@@ -2,7 +2,7 @@
 %
 %
 
-how to write Common Lisp in 2014
+how to write Common Lisp in 2015
 
 an initiation manual for the uninitiated
 

make.lisp

@@ -166,13 +166,13 @@
     (write-sequence (build-banner filename (find-file-prefixes (ls)))
                     stream))
 
-(let ((error?  (with-output-to-string (s)
-           (external-program:run
-            "pandoc"
-            (generate-command filename)
-            :error s))))
-  (when error?
-    (format t "~&Oh no, a Thing appeared and ate the pandoc generator, leaving this note - ~a~%" error?))))
+  (let ((error?  (with-output-to-string (s)
+                   (external-program:run
+                    "pandoc"
+                    (generate-command filename)
+                    :error s))))
+    (when (string/= ""  error?)
+      (format t "~&Oh no, a Thing appeared and ate the pandoc generator, leaving this note - ~a~%" error?))))
 
 
 (defun build-files ()
@@ -189,7 +189,7 @@
                                               "~"
                                               file
                                               ":")))))
-           (external-program:run "cp" args :error *standard-output*))))
+           (external-program:run "mv" args :error *standard-output*))))
 
   (format t "~&final reticulation...~&")
   ;; Get the static content over.