Index: /branches/ide-1.0/ccl/hemlock/src/line.lisp
===================================================================
--- /branches/ide-1.0/ccl/hemlock/src/line.lisp	(revision 6610)
+++ /branches/ide-1.0/ccl/hemlock/src/line.lisp	(revision 6611)
@@ -160,5 +160,5 @@
 
 (defun adjust-line-origins-forward (line)
-  (let* ((stoart (get-line-origin line)))
+  (let* ((start (get-line-origin line)))
     (do* ((next (line-next line) (line-next next)))
          ((null next))