Various bug fixes.

[pspp-builds.git] / src / data-list.c

diff --git a/src/data-list.c b/src/data-list.c
index 7328f65eec9781bc5814ca010cc4ae11ba059012..756fedc8b29219657be598771fe443cb53d8e571 100644 (file)
--- a/src/data-list.c
+++ b/src/data-list.c
@@ -208,7 +208,10 @@ cmd_data_list (void)
                       if (lex_match_id ("TAB"))
                         delim = '\t';
                       else if (token == T_STRING && tokstr.length == 1)
-                        delim = tokstr.string[0];
+                       {
+                         delim = tokstr.string[0];
+                         lex_get();
+                       }
                       else 
                         {
                           lex_error (NULL);