diff --git a/src/invent.c b/src/invent.c
index 1f30bcc60..7bbaf3fa6 100644
--- a/src/invent.c
+++ b/src/invent.c
@@ -3972,6 +3972,10 @@ register struct obj *otmp, *obj;
         && (obj->oeaten != otmp->oeaten || obj->orotten != otmp->orotten))
         return FALSE;
 
+    if (obj->oclass == SCROLL_CLASS
+        && (obj->corpsenm != NON_PM && obj->corpsenm != otmp->corpsenm))
+        return FALSE;
+    
     if (obj->dknown != otmp->dknown
         || (obj->bknown != otmp->bknown && !Role_if(PM_PRIEST))
         || obj->oeroded != otmp->oeroded