Mercurial > emacs

changeset 28190:aa79cfcecd73

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(read_integer): Unread the last char not consumed.
author Gerd Moellmann <gerd@gnu.org>
date Sat, 18 Mar 2000 01:04:28 +0000
parents d7ec07dcbaa6
children b65709e0ea05
files src/lread.c
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/lread.c	Fri Mar 17 22:46:46 2000 +0000
+++ b/src/lread.c	Sat Mar 18 01:04:28 2000 +0000
@@ -1637,7 +1637,10 @@
 	  else if (c >= 'A' && c <= 'Z')
 	    digit = c - 'A' + 10;
 	  else
-	    break;
+	    {
+	      UNREAD (c);
+	      break;
+	    }
 
 	  if (digit < 0 || digit >= radix)
 	    invalid_p = 1;