brmlab/brmdoor
4
0
Fork 0
mirror of https://github.com/brmlab/brmdoor.git synced 2025-06-08 11:44:01 +02:00
Code Issues Projects Releases Packages Wiki Activity

brmd: Move manual update logic from web_brmstatus_switch() to status_update()

Browse source
This commit is contained in:
Petr Baudis 2011-05-07 02:03:51 +02:00
parent 69cdcabd1e
commit 6aaf5051bb
1 changed files with 10 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

17
brmd/brmd.pl
View file

@ -56,9 +56,17 @@ sub record_str {
} }
sub status_update { sub status_update {
my ($self, $newstatus) = @_[OBJECT, ARG0]; my ($self, $newstatus, $manual, $nick) = @_[OBJECT, ARG0 .. ARG2];
$status = $newstatus; $status = $newstatus;
my $st = status_str(); my $st = status_str();
if ($manual) {
$serial->put('s'.$newstatus);
$serial->flush();
$poe_kernel->post($irc, 'notify_manual_update', 'brmstatus', $nick );
}
$poe_kernel->post( $irc, 'notify_update', 'brmstatus', $st ); $poe_kernel->post( $irc, 'notify_update', 'brmstatus', $st );
} }
@ -372,13 +380,8 @@ sub web_brmstatus_switch {
my $nick = $q->param('nick'); my $nick = $q->param('nick');
my $newstatus = not $status; my $newstatus = not $status;
$serial->put('s'.$newstatus);
$serial->flush();
$poe_kernel->post($irc, 'notify_manual_update', 'brmstatus', $nick );
foreach (@{$self->{observers}}) { foreach (@{$self->{observers}}) {
$poe_kernel->post($_, 'status_update', $newstatus); $poe_kernel->post($_, 'status_update', $newstatus, 'manual', $nick);
} }
$response->protocol("HTTP/1.1"); $response->protocol("HTTP/1.1");