monitoring/PerlModules/NP/Debug/Debug.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-)
New commits: commit 4ba71014874ec71642788141d91cf1d29fd5f324 Author: Jan Pazdziora jpazdziora@redhat.com Date: Fri Feb 18 10:40:41 2011 +0100
Use three-parameter opens.
diff --git a/monitoring/PerlModules/NP/Debug/Debug.pm b/monitoring/PerlModules/NP/Debug/Debug.pm index 2196d09..e50d462 100644 --- a/monitoring/PerlModules/NP/Debug/Debug.pm +++ b/monitoring/PerlModules/NP/Debug/Debug.pm @@ -88,8 +88,7 @@ sub addstream {
# Assume fh is a filename ($filename) = $fh =~ /(.*)/; - ($append) = $append =~ /(.*)/; - unless (open($newfh, "$append $filename")) { + unless (open($newfh, $append, $filename)) { $@ = "Can't write to file '$filename': $!"; return undef; } @@ -534,7 +533,7 @@ sub rotate {
# Reopen the file my $append = $self->append; - unless (open($self->fh, "$append $oldname")) { + unless (open($self->fh, $append, $oldname)) { $@ = "Can't create file '$oldname': $!"; return undef; }
spacewalk-commits@lists.fedorahosted.org