فهرست منبع

Output time parsed per file correctly, was always showing time since program start for each file

sbingner 25 سال پیش
والد
کامیت
9b6f3add71
1فایلهای تغییر یافته به همراه2 افزوده شده و 1 حذف شده
  1. 2 1
      pisg.pl

+ 2 - 1
pisg.pl

@@ -226,6 +226,7 @@ sub init_pisg
     $normals = "0";
     $time = localtime($timestamp);
     $repeated = 0;
+    $conf->{start} = time();   # set start time of file parse
 
     print "Using language template: $conf->{lang}\n\n" if ($conf->{lang} ne 'EN');
 
@@ -632,7 +633,7 @@ sub parse_file
 
     close(LOGFILE);
 
-    my ($sec,$min,$hour) = gmtime(time - $^T);
+    my ($sec,$min,$hour) = gmtime(time - $conf->{start});
     $processtime = sprintf("%02d hours, %02d minutes and %02d seconds", $hour,  $min, $sec);
 
     $nicks = scalar keys %line;