Home | History | Annotate | Download | only in util

Lines Matching refs:rassigned

136 my %rassigned;  # lib -> colon-separated list of assigned reason codes
160         $rassigned{$lib} = ":";
222                 if $rassigned{$lib} =~ /:$code:/;
223             $rassigned{$lib} .= "$code:";
239             if ( $rassigned{$lib} =~ m/^:(.*):$/ ) {
240                 my @rassigned = sort { $a <=> $b } split( ":", $1 );
241                 print STDERR "  ", join(' ', @rassigned), "\n";
373                     $rassigned{$lib} =~ m/^:([^:]*):/;
376                     while ( $rassigned{$lib} =~ m/:$findcode:/ ) {
380                     $rassigned{$lib} .= "$findcode:";
477                 $rassigned{$lib} =~ m/^:([^:]*):/;
480                 while ( $rassigned{$lib} =~ m/:$findcode:/ ) {
484                 $rassigned{$lib} .= "$findcode:";