From ccb0e753628e08a767b808487e5702f919edd351 Mon Sep 17 00:00:00 2001
From: Adam Dickmeiss <adam@indexdata.dk>
Date: Fri, 23 Aug 1996 11:59:47 +0000
Subject: [PATCH] Bug fix: infinite look in ir_oid.

---
 explain.c |    6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/explain.c b/explain.c
index 315b074..be59d5f 100644
--- a/explain.c
+++ b/explain.c
@@ -5,7 +5,10 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: explain.c,v $
- * Revision 1.4  1996-08-22 13:39:31  adam
+ * Revision 1.5  1996-08-23 11:59:47  adam
+ * Bug fix: infinite look in ir_oid.
+ *
+ * Revision 1.4  1996/08/22  13:39:31  adam
  * More work on explain.
  *
  * Revision 1.3  1996/08/21  13:32:50  adam
@@ -279,6 +282,7 @@ static int ir_oid (IrExpArg *iea,
         sprintf (buf, "%c%d", first, *p);
         Tcl_AppendResult (iea->interp, buf, NULL);
         first = '.';
+        p++;
     }
     return ir_match_end (name, iea, argi);
 }
-- 
1.7.10.4