Add a quit ocmmand, for easier profiling.
authorSteinar H. Gunderson <sgunderson@bigfoot.com>
Sat, 20 Sep 2014 11:42:12 +0000 (13:42 +0200)
committerSteinar H. Gunderson <sgunderson@bigfoot.com>
Sat, 20 Sep 2014 11:42:12 +0000 (13:42 +0200)
remoteglot.pl

index b66fd2c..b248d5f 100755 (executable)
@@ -180,6 +180,9 @@ sub handle_fics {
                } elsif ($msg =~ /^stoppgn$/) {
                        $t->cmd("tell $who Stopping poll.");
                        $http_timer = undef;
+               } elsif ($msg =~ /^quit$/) {
+                       $t->cmd("tell $who Bye bye.");
+                       exit;
                } else {
                        $t->cmd("tell $who Couldn't understand '$msg', sorry.");
                }