*** empty log message ***

original commit: f06328300fb76a609aa492fdd530e359937a6cd6

collects/mzlib/info.ss

@@ -1,4 +0,0 @@
-
-(module info (lib "infotab.ss" "setup")
-  (define name "MzLib"))
-

collects/parser-tools/lex.ss

@@ -154,8 +154,8 @@
 		(cond
 		 ((= 0 num-to-add) (values from to))
 		 (else
-		  (cond
-		   ((eq? #\newline (car from))
+		  (if (eq? #\newline (car from))
+		      (begin
 			(set-lex-buffer-line! 
 			 lb
 			 (sub1 (lex-buffer-line lb)))
@@ -164,11 +164,7 @@
 			 (car (lex-buffer-line-lengths lb)))
 			(set-lex-buffer-line-lengths!
 			 lb
-		     (cdr (lex-buffer-line-lengths lb))))
-		   (else
-		    (set-lex-buffer-offset! 
-		     lb 
-		     (sub1 (lex-buffer-offset lb)))))
+			 (cdr (lex-buffer-line-lengths lb)))))
 		  (switch-buffers (cdr from) 
 				  (cons (car from) to) 
 				  (sub1 num-to-add)))))))