--- deliantra/server/include/event2inc 2006/08/28 12:07:13 1.1 +++ deliantra/server/include/event2inc 2006/11/26 02:37:46 1.3 @@ -1,5 +1,13 @@ #! perl +print <) { if (/^=head2 (\S+) EVENTS/) { $klass = $1;