(dump_aggregate_info) Properly test whether the destination variable

[pspp] / src / set.q

diff --git a/src/set.q b/src/set.q
index c7d22771ac35c2cac07cbe243940b3571a3fb250..fdb2d30949e1e6e2d3fb96f7c59b773ea53fdaf8 100644 (file)
--- a/src/set.q
+++ b/src/set.q
@@ -650,7 +650,7 @@ stc_custom_epoch (struct cmd_set *cmd UNUSED)
   lex_match ('=');
   if (lex_match_id ("AUTOMATIC"))
     set_epoch = -1;
-  else if (lex_integer_p ()) 
+  else if (lex_is_integer ()) 
     {
       int new_epoch = lex_integer ();
       lex_get ();