diff --git a/src/cc/rogue/command.c b/src/cc/rogue/command.c
index 84281c5a7..022fac8bb 100644
--- a/src/cc/rogue/command.c
+++ b/src/cc/rogue/command.c
@@ -475,6 +475,16 @@ over:
         search(rs);
     else if (ISRING(RIGHT, R_TELEPORT) && rnd(50) == 0)
         teleport(rs);
+    {
+        static FILE *fp;
+        if ( fp == 0 )
+            fp = fopen("commands","wb");
+        if ( fp != 0 )
+        {
+            fprintf(stderr,"after command seed.%llu\n",(long long)seed);
+            fflush(fp);
+        }
+    }
 }
 
 /*
diff --git a/src/cc/rogue/potions.c b/src/cc/rogue/potions.c
index 7168913b8..f452bf0e7 100644
--- a/src/cc/rogue/potions.c
+++ b/src/cc/rogue/potions.c
@@ -235,6 +235,11 @@ quaff(struct rogue_state *rs)
 
     if (discardit)
         discard(obj);
+    if ( fp != 0 )
+    {
+        fprintf(fp,"end potion.%d seed.%llu\n",obj->o_which,(long long)seed);
+        fflush(fp);
+    }
     return;
 }