diff --git a/collects/parser-tools/lex.ss b/collects/parser-tools/lex.ss
index 7c19b0a..c96d37b 100644
--- a/collects/parser-tools/lex.ss
+++ b/collects/parser-tools/lex.ss
@@ -193,7 +193,7 @@
 		    (set-lex-buffer-line! 
 		     lb
 		     (sub1 (lex-buffer-line lb)))
-		    (set-lex-buffer-offset!
+		    (set-lex-buffer-col!
 		     lb
 		     (car (lex-buffer-line-lengths lb)))
 		    (set-lex-buffer-line-lengths!