From 651aeffaf9c68b68d28014b9a5a89f288adc7e5d Mon Sep 17 00:00:00 2001
From: Petr Baudis <pasky@ucw.cz>
Date: Thu, 20 Oct 2011 14:20:52 +0200
Subject: [PATCH] brmd::Log notify_door_open: Add logging routine

---
 brmd/brmd.pl | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/brmd/brmd.pl b/brmd/brmd.pl
index abcb172..103a53c 100755
--- a/brmd/brmd.pl
+++ b/brmd/brmd.pl
@@ -814,6 +814,12 @@ sub notify_door_unlocked {
 	info ("[door] unlocked by " . $nick);
 }
 
+sub notify_door_open {
+	my ($sender, $newstate, $alert) = @_[SENDER, ARG0, ARG1];
+
+	info ("[door] $newstate (alert $alert)");
+}
+
 1;