## CHANGELOG
## 2004-04-21: Initial version.
##
-## $Id: event-func.pl,v 1.10 2004/08/10 16:05:46 hawk Exp $
##########################################
-our $event_file_all = "${event_datadir}changes.evt";
-sub get_filename_event($) {
- my $class_device = "$_[0]";
- my $filename = "${event_datadir}class_${class_device}.evt";
- return $filename;
-}
-
-sub get_filename_bandwidth_info($) {
- my $class_device = "$_[0]";
- my $filename = "${event_datadir}class_${class_device}_bandwidth.evt";
- return $filename;
-}
-
sub update_event_file($$$) {
my $filename = $_[0];
my $information = $_[1];