Changeset 1184
- Timestamp:
- Jun 12, 2015, 3:41:38 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
obs_notify_generic/obs_notify_generic.pm
r1179 r1184 34 34 use Data::Dumper; 35 35 use IPC::Run; 36 use Time::Piece; 36 37 37 38 #use XML::Simple; … … 80 81 81 82 #print $entry->{'action'}, "\n"; 83 if ( $paramRef->{'project'} ) { 84 my $project = $paramRef->{'project'}; 85 $project =~ s/:/:\//g; 86 $paramRef->{'project_path'}="/srv/obs/repos/" . $project; 87 } 82 88 my $check = join '|', keys %{$paramRef}; 83 89 my $action = $entry->{'action'}; … … 150 156 } 151 157 158 print $fh localtime->strftime("%Y%m%d %H%M%S"), " TYPE=$type"; 159 152 160 if ($extra) { 153 print $fh " TYPE=$type\n";161 print $fh "\n"; 154 162 print $fh Dumper( { 'param' => $paramRef, 'extra' => $extra } ); 155 163 print $fh "\n"; 156 164 } else { 157 print $fh " TYPE=$type";165 print $fh " "; 158 166 print $fh Data::Dumper->new( [$paramRef] )->Indent(0)->Dump; 159 167 print $fh "\n";
Note:
See TracChangeset
for help on using the changeset viewer.