diff --git a/nwn/nwnprc/trunk/include/prc_x2_craft.nss b/nwn/nwnprc/trunk/include/prc_x2_craft.nss
index f793f9a7..5f692b6c 100644
--- a/nwn/nwnprc/trunk/include/prc_x2_craft.nss
+++ b/nwn/nwnprc/trunk/include/prc_x2_craft.nss
@@ -594,9 +594,13 @@ object CICraftScribeScroll(object oCreator, int nSpellID)
             return OBJECT_INVALID;
         }
         else
-        {
-            DestroyObject(oMat);
-        }
+		{			
+			int nStack = GetNumStackedItems(oMat);  
+			if (nStack > 1)  
+				SetItemStackSize(oMat, nStack - 1);  
+			else  
+				DestroyObject(oMat);
+		}
     }
 
     // Resolve class and scroll template