bin/disorder-notify (watch_and_notify0): Track state while logging.

diff --git a/bin/disorder-notify b/bin/disorder-notify
index f5b646886229ff0f749c71a5760d795b9298c68e..95ed5765bf118f50321402fdf0433001cb663857 100755 (executable)
--- a/bin/disorder-notify
+++ b/bin/disorder-notify
@@ -214,12 +214,18 @@ sub watch_and_notify0 ($) {
       my @f = split_fields $line;
       if ($f[1] eq "state") {
        my $msg = undef;
-       if ($f[2] eq "disable_random") { $msg = "Random play disabled"; }
-       elsif ($f[2] eq "enable_random") { $msg = "Random play enabled"; }
-       elsif ($f[2] eq "disable_play") { $msg = "Playing disabled"; }
-       elsif ($f[2] eq "enable_play") { $msg = "Playing enabled"; }
-       elsif ($f[2] eq "pause") { $msg = "Paused"; }
-       elsif ($f[2] eq "resume") { $msg = "Playing"; }
+       if ($f[2] eq "disable_random")
+         { $st->{random} = 0; $msg = "Random play disabled"; }
+       elsif ($f[2] eq "enable_random")
+         { $st->{random} = 1; $msg = "Random play enabled"; }
+       elsif ($f[2] eq "disable_play")
+         { $st->{play} = 0; $msg = "Playing disabled"; }
+       elsif ($f[2] eq "enable_play")
+         { $st->{play} = 1; $msg = "Playing enabled"; }
+       elsif ($f[2] eq "pause")
+         { $st->{pause} = 1; $msg = "Paused"; }
+       elsif ($f[2] eq "resume")
+         { $st->{pause} = 0; $msg = "Playing"; }
        notify "$TITLE state", $msg if defined $msg;
       } elsif ($f[1] eq "playing") {
        my %info;