From f45d6376e3ca0bbdbfad739ad3a771d3faa7cfdc Mon Sep 17 00:00:00 2001 From: "Steinar H. Gunderson" Date: Sat, 20 Sep 2014 13:42:12 +0200 Subject: [PATCH 1/1] Add a quit ocmmand, for easier profiling. --- remoteglot.pl | 3 +++ 1 file changed, 3 insertions(+) diff --git a/remoteglot.pl b/remoteglot.pl index b66fd2c..b248d5f 100755 --- a/remoteglot.pl +++ b/remoteglot.pl @@ -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."); } -- 2.39.2