Changeset 3838
- Timestamp:
- 07/27/10 19:49:38 (2 years ago)
- Files:
-
- trunk/node/lib/Munin/Node/SpoolReader.pm (modified) (2 diffs)
- trunk/node/lib/Munin/Node/SpoolWriter.pm (modified) (1 diff)
- trunk/node/t/munin_node_spoolwriter.t (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/node/lib/Munin/Node/SpoolReader.pm
r3837 r3838 64 64 # FIXME: shortcut by checking mtime of file? 65 65 66 open my $fh, '<', "$self->{spooldir}/munin-daemon.$service "66 open my $fh, '<', "$self->{spooldir}/munin-daemon.$service.0" 67 67 or die "Unable to open spool file: $!"; 68 68 … … 95 95 or die "Unable to reset the spool directory handle: $!"; 96 96 97 return map { m/^munin-daemon\.(\w+) $/ ? $1 : () }97 return map { m/^munin-daemon\.(\w+).0$/ ? $1 : () } 98 98 readdir $self->{spooldirhandle}; 99 99 } trunk/node/lib/Munin/Node/SpoolWriter.pm
r3829 r3838 37 37 my ($self, $timestamp, $service, $data) = @_; 38 38 39 open my $fh , '>>', "$self->{spooldir}/munin-daemon.$service "39 open my $fh , '>>', "$self->{spooldir}/munin-daemon.$service.0" 40 40 or die "Unable to open spool file: $!"; 41 41 trunk/node/t/munin_node_spoolwriter.t
r3829 r3838 45 45 ]); 46 46 47 my $data_file = "$dir/munin-daemon.fnord ";47 my $data_file = "$dir/munin-daemon.fnord.0"; 48 48 ok( -r $data_file, 'spool file is readable') or last; 49 49 … … 124 124 ]); 125 125 126 my $data_file = "$dir/munin-daemon.fnord ";126 my $data_file = "$dir/munin-daemon.fnord.0"; 127 127 unless ( -r $data_file) { 128 128 fail("$msg: File not created"); … … 151 151 ]); 152 152 153 my $data_file = "$dir/munin-daemon.fnord ";153 my $data_file = "$dir/munin-daemon.fnord.0"; 154 154 ok( -r $data_file, 'spool file is readable') or last; 155 155
