X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Futilities%2Fset.q;h=d264a00ef95880dc4a16155eb1305f6836f77e64;hb=f1b01009a4d6468f4688a4786752edfcd7899d04;hp=e8cdf1aad89e6c0dfc3996a286698450779a1c15;hpb=dd2e61b4a4e0f5605588a9d7249ea5d9bd70287a;p=pspp-builds.git

diff --git a/src/language/utilities/set.q b/src/language/utilities/set.q
index e8cdf1aa..d264a00e 100644
--- a/src/language/utilities/set.q
+++ b/src/language/utilities/set.q
@@ -1,5 +1,5 @@
 /* PSPP - a program for statistical analysis.
-   Copyright (C) 1997-9, 2000, 2006 Free Software Foundation, Inc.
+   Copyright (C) 1997-9, 2000, 2006, 2009 Free Software Foundation, Inc.
 
    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -376,8 +376,6 @@ stc_custom_locale (struct lexer *lexer, struct dataset *ds UNUSED,
 
   s = lex_tokstr (lexer);
 
-  lex_get (lexer);
-
   /* First try this string as an encoding name */
   if ( valid_encoding (ds_cstr (s)))
     set_default_encoding (ds_cstr (s));
@@ -393,6 +391,8 @@ stc_custom_locale (struct lexer *lexer, struct dataset *ds UNUSED,
       return 0;
     }
 
+  lex_get (lexer);
+
   return 1;
 }