bin/rpi
branchrsync
changeset 15 169731647b5d
parent 14 efac4db3fa3f
child 19 4e50f848f55b
equal deleted inserted replaced
14:efac4db3fa3f 15:169731647b5d
   304     for (keys(%{$important})) {
   304     for (keys(%{$important})) {
   305       if ($line =~ $_) {
   305       if ($line =~ $_) {
   306 	my $t = $important->{$_}->($1, $2, $3, $4, $5, $6, $7, $8, $9);
   306 	my $t = $important->{$_}->($1, $2, $3, $4, $5, $6, $7, $8, $9);
   307 	if (defined $u) {
   307 	if (defined $u) {
   308 	  $m->{$u} = '' unless defined $m->{$u};
   308 	  $m->{$u} = '' unless defined $m->{$u};
   309 	  $m->{$u} .= "[$c]: $line";
   309 	  $m->{$u} .= "[" . ( defined $c ? $c : "no changesfile" ) . "]: $line";
   310 	  $m->{$u} .= $t if defined $t;
   310 	  $m->{$u} .= $t if defined $t;
   311 	  $m->{$u} .= "\n";
   311 	  $m->{$u} .= "\n";
   312 	}
   312 	}
   313 	next LINE;
   313 	next LINE;
   314       }
   314       }