[version 0.9.1
ediware**20071117060022] {
hunk ./CHANGELOG 1
+Version 0.9.1
+2007-11.16
+Fixed bug in SKIP-LEADING-WHITESPACE (thanks to Chaitanya Gupta)
+	
hunk ./doc/index.html 80
-HTML-TEMPLATE is used by <a href="http://planet.lisp.org/">Planet Lisp</a>, <a href="http://www.cleartrip.com/">Cleartrip</a>, <a href="http://lemonodor.com/archives/000950.html">Booble</a>, <a href="http://ergoweb.de/">ERGO</a> and <a href="http://heikestephan.de/">Heike Stephan</a>.
+HTML-TEMPLATE is used by <a href="http://planet.lisp.org/">Planet Lisp</a>, <a href="http://www.cleartrip.com/">Cleartrip</a>, <a href="http://lemonodor.com/archives/000950.html">Booble</a>, and <a href="http://heikestephan.de/">Heike Stephan</a>.
hunk ./doc/index.html 327
-current version is 0.9.0.
+current version is 0.9.1.
hunk ./doc/index.html 402
+<p>
+If you want to send patches, please <a href="http://weitz.de/patches.html">read this first</a>.
hunk ./doc/index.html 527
-created (either explicitely by <a
+created (either explicitly by <a
hunk ./doc/index.html 529
-or implicitely by <a
+or implicitly by <a
hunk ./doc/index.html 677
-implicitely converted into a template printer at generation
-time as if it were explicitely converted by a call to <a
+implicitly converted into a template printer at generation
+time as if it were explicitly converted by a call to <a
hunk ./doc/index.html 1468
-$Header: /usr/local/cvsrep/html-template/doc/index.html,v 1.51 2007/03/09 13:09:18 edi Exp $
+$Header: /usr/local/cvsrep/html-template/doc/index.html,v 1.56 2007/11/16 21:09:26 edi Exp $
hunk ./html-template.asd 2
-;;; $Header: /usr/local/cvsrep/html-template/html-template.asd,v 1.14 2007/03/09 13:09:16 edi Exp $
+;;; $Header: /usr/local/cvsrep/html-template/html-template.asd,v 1.15 2007/11/16 21:09:24 edi Exp $
hunk ./html-template.asd 31
-  :version "0.9.0"
+  :version "0.9.1"
hunk ./util.lisp 2
-;;; $Header: /usr/local/cvsrep/html-template/util.lisp,v 1.19 2007/01/01 23:49:16 edi Exp $
+;;; $Header: /usr/local/cvsrep/html-template/util.lisp,v 1.20 2007/11/16 21:09:24 edi Exp $
hunk ./util.lisp 237
-      (cond ((char= #\Newline (char string
-                                    (1- (fill-pointer string))))
+      (cond ((let ((fill-pointer (fill-pointer string)))
+               (and (plusp fill-pointer)
+                    (char= #\Newline (char string (1- fill-pointer)))))
}