Archived
1
0
Fork 0

Fix token generation

This commit is contained in:
Mercier Pierre-Olivier 2013-09-14 18:54:01 +02:00
commit 905cc5f2e2
2 changed files with 10 additions and 5 deletions

View file

@ -34,6 +34,8 @@ sub log($@)
{
my $level = shift;
if ($#_ < 0) { return; }
if (!$log_fd && $log_file) {
open ($log_fd, ">>", $log_file) or die("Unable to open log ($log_file) file for writing");
say $log_fd strftime("%a %b %e %H:%M:%S %Y", localtime), " START new logging session ";