From 1de4221b9e906ce8324237943165c161f78b5e07 Mon Sep 17 00:00:00 2001
From: Bardur Arantsson <bardur@scientician.net>
Date: Fri, 6 Apr 2012 18:34:59 +0200
Subject: Lua: Remove unused lose_all_corruptions()

---
 lib/core/crpt_aux.lua            | 9 ---------
 lib/mods/theme/core/crpt_aux.lua | 9 ---------
 src/externs.h                    | 1 -
 src/xtra2.c                      | 6 ------
 4 files changed, 25 deletions(-)

diff --git a/lib/core/crpt_aux.lua b/lib/core/crpt_aux.lua
index 7703a815..369cf5d1 100644
--- a/lib/core/crpt_aux.lua
+++ b/lib/core/crpt_aux.lua
@@ -120,15 +120,6 @@ function lose_corruption()
 	end
 end
 
--- Lose all corruptions (for e.g. Potion of New Life)
-function lose_all_corruptions()
-	local i;
-	for i = 0, __corruptions_max - 1 do
-		lose_corruption()
-	end
-	return -1
-end
-
 -- Creates a new corruption
 function add_corruption(c)
 	assert(c.color, "No corruption color")
diff --git a/lib/mods/theme/core/crpt_aux.lua b/lib/mods/theme/core/crpt_aux.lua
index 7703a815..369cf5d1 100644
--- a/lib/mods/theme/core/crpt_aux.lua
+++ b/lib/mods/theme/core/crpt_aux.lua
@@ -120,15 +120,6 @@ function lose_corruption()
 	end
 end
 
--- Lose all corruptions (for e.g. Potion of New Life)
-function lose_all_corruptions()
-	local i;
-	for i = 0, __corruptions_max - 1 do
-		lose_corruption()
-	end
-	return -1
-end
-
 -- Creates a new corruption
 function add_corruption(c)
 	assert(c.color, "No corruption color")
diff --git a/src/externs.h b/src/externs.h
index 38a91d9e..579ed463 100644
--- a/src/externs.h
+++ b/src/externs.h
@@ -1679,7 +1679,6 @@ extern bool_ curse_weapon(void);
 extern bool_ curse_armor(void);
 extern void random_resistance(object_type * q_ptr, bool_ is_scroll, int specific);
 extern bool_ lose_corruption(int choose_mut);
-extern bool_ lose_all_corruptions(void);
 extern void great_side_effect(void);
 extern void nasty_side_effect(void);
 extern void deadly_side_effect(bool_ god);
diff --git a/src/xtra2.c b/src/xtra2.c
index 34a2a283..1a6ec3a0 100644
--- a/src/xtra2.c
+++ b/src/xtra2.c
@@ -5613,12 +5613,6 @@ bool_ lose_corruption(int choose_mut)
 	return (FALSE);
 }
 
-bool_ lose_all_corruptions(void)
-{
-	exec_lua("lose_all_corruptions()");
-	return (FALSE);
-}
-
 bool_ get_hack_dir(int *dp)
 {
 	int dir;
-- 
cgit v1.2.3