diff options
| author | Ralf Corsepius <ralf.corsepius@rtems.org> | 2010-09-08 04:11:06 +0000 |
|---|---|---|
| committer | Ralf Corsepius <ralf.corsepius@rtems.org> | 2010-09-08 04:11:06 +0000 |
| commit | 4539347502ae8892f662b3295079e33f66c76ba3 (patch) | |
| tree | 8da84f5ab4cbae8d904ba12ca1407c031a9f1c56 /contrib | |
| parent | Prepend @condstack to @buffer4 lines. (diff) | |
| download | rtems-4539347502ae8892f662b3295079e33f66c76ba3.tar.bz2 | |
Parse condstack in final printing.
Diffstat (limited to 'contrib')
| -rwxr-xr-x | contrib/crossrpms/specstrip | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/contrib/crossrpms/specstrip b/contrib/crossrpms/specstrip index feda29636c..f7fbb9cbf5 100755 --- a/contrib/crossrpms/specstrip +++ b/contrib/crossrpms/specstrip @@ -240,4 +240,16 @@ foreach my $line ( @buffer3 ) # print STDERR @condstack, "LINE: $line\n"; } -print STDOUT @buffer4; +print STDERR @buffer4 if $verbose > 2; + +foreach my $line (@buffer4) { + if ( $line =~ /^(<.*>):(.*)$/ ) { + if ( $1 =~ m/.*<FALSE:.*$/ ) { + } else { + print STDOUT "$2\n"; + } + } else { + die "Unexpected value: $line\n"; + } +} + |