added code to new() to handle 'event' entries

diff --git a/src/lib/Spong/HistoryList.pm b/src/lib/Spong/HistoryList.pm
index a48a94c86a03eb16c02501b2604d159ea197e517..e2b2f70410d430c5a3097b063d3b68afe7026a07 100755 (executable)
--- a/src/lib/Spong/HistoryList.pm
+++ b/src/lib/Spong/HistoryList.pm
@@ -49,7 +49,10 @@ sub new {
         } elsif( /^ack (\d+) (\S+) (.*)$/ ) {
            push( @list, 
                  Spong::History->new( $host, "ack", $1, $2, "blue", $3 ));
-        }
+        } elsif( /^event (\d+) (\S+) (\S+) (.*)$/ ) {
+           push( @list, 
+                  Spong::History->new( $host, "event", $1, $2, $3, $4 ) );
+         }
       }
       close( FILE );
    }