From 743b7dffce48c6892472de9aa306a4a498b2bceb Mon Sep 17 00:00:00 2001
From: Simon <simon@hardwired.org.uk>
Date: Tue, 19 Apr 2011 18:09:36 +0100
Subject: bcol Catelite merge


diff --git a/src/elements/bcol.c b/src/elements/bcol.c
index 5be50d9..8482b98 100644
--- a/src/elements/bcol.c
+++ b/src/elements/bcol.c
@@ -23,6 +23,13 @@ int update_BCOL(UPDATE_FUNC_ARGS) {
 						parts[i].life = 99;
 					}
 				}
+				if ((r&0xFF)==PT_LAVA && 1>(rand()%500))
+				{
+					if (parts[r>>8].ctype == 76) {
+						parts[r>>8].ctype = 14;
+						kill_part(i);
+					}
+				}
 			}
 	return 0;
 }
--
cgit v0.9.2-21-gd62e