Changeset 1184 for obs_notify_generic/obs_notify_generic.pm

Timestamp:

Jun 12, 2015, 3:41:38 PM (9 years ago)

Author:

joergs

Message:

added timestamp in logfile, generate project_path parameter

File:

• obs_notify_generic/obs_notify_generic.pm (modified) (3 diffs)

obs_notify_generic/obs_notify_generic.pm

@@ -34 +34 @@
 use Data::Dumper;
 use IPC::Run;
+use Time::Piece;
 
 #use XML::Simple;
@@ -80 +81 @@
 
                 #print $entry->{'action'}, "\n";
+                if ( $paramRef->{'project'} ) {
+                                        my $project = $paramRef->{'project'};
+                                        $project =~ s/:/:\//g;
+                                        $paramRef->{'project_path'}="/srv/obs/repos/" . $project;
+                }
                 my $check = join '|', keys %{$paramRef};
                 my $action = $entry->{'action'};
@@ -150 +156 @@
     }
 
+    print $fh localtime->strftime("%Y%m%d %H%M%S"), " TYPE=$type";
+    
     if ($extra) {
-        print $fh "TYPE=$type\n";
+        print $fh "\n";
         print $fh Dumper( { 'param' => $paramRef, 'extra' => $extra } );
         print $fh "\n";
     } else {
-        print $fh "TYPE=$type ";
+        print $fh " ";
         print $fh Data::Dumper->new( [$paramRef] )->Indent(0)->Dump;
         print $fh "\n";