diff --git a/spell/MoodChange/spell_charm_monsters.arc b/spell/MoodChange/spell_charm_monsters.arc
index 497451892..c348be022 100644
--- a/spell/MoodChange/spell_charm_monsters.arc
+++ b/spell/MoodChange/spell_charm_monsters.arc
@@ -16,5 +16,5 @@ range 1
 range_modifier 3
 maxsp 27
 no_attack 1
-other_arch detect_magic
+other_arch charm_aura
 end
diff --git a/spell/MoodChange/spell_siren_call.arc b/spell/MoodChange/spell_siren_call.arc
new file mode 100644
index 000000000..ab39d942e
--- /dev/null
+++ b/spell/MoodChange/spell_siren_call.arc
@@ -0,0 +1,20 @@
+Object spell_siren_call
+name siren call
+name_pl siren call
+face spell_praying.111
+level 7
+grace 20
+casting_time 10
+path_attuned 1024
+skill praying
+type 101
+subtype 34
+value 50
+no_drop 1
+invisible 1
+range 3
+range_modifier 3
+maxgrace 27
+no_attack 1
+other_arch charm_aura
+end