Fix indentation to match style guide

Fix indentation to match style guide

[Chris Gregory]

This patch fixes these two places that did not correctly use tabs and
spaces in conjunction.

diff --git a/src/keyboard.c b/src/keyboard.c
index f2ee313..4745a7f 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -2161,10 +2161,10 @@ read_event_from_main_queue (struct timespec *end_time,
       Lisp_Object last = KVAR (kb, kbd_queue);
       if (CONSP (last))
         {
-          while (CONSP (XCDR (last)))
-      	last = XCDR (last);
-          if (!NILP (XCDR (last)))
-      	emacs_abort ();
+	  while (CONSP (XCDR (last)))
+	    last = XCDR (last);
+	  if (!NILP (XCDR (last)))
+	    emacs_abort ();
         }
       if (!CONSP (last))
         kset_kbd_queue (kb, list1 (c));
diff --git a/src/lread.c b/src/lread.c
index 35348f1..f14c68e 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -2643,15 +2643,15 @@ read1 (Lisp_Object readcharfun, int *pch, bool first_in_list)
 	      ht = Fmake_hash_table (param_count, params);
 
 	      while (CONSP (data))
-	      	{
-	      	  key = XCAR (data);
-	      	  data = XCDR (data);
-	      	  if (!CONSP (data))
+		{
+		  key = XCAR (data);
+		  data = XCDR (data);
+		  if (!CONSP (data))
 		    error ("Odd number of elements in hash table data");
-	      	  val = XCAR (data);
-	      	  data = XCDR (data);
-	      	  Fputhash (key, val, ht);
-	      	}
+		  val = XCAR (data);
+		  data = XCDR (data);
+		  Fputhash (key, val, ht);
+		}
 
 	      return ht;
 	    }