diff -r ba90e30c0f3c -r 6669177dab54 uh_parser/RaptorWarning.pm --- a/uh_parser/RaptorWarning.pm Wed Apr 07 17:31:01 2010 +0100 +++ b/uh_parser/RaptorWarning.pm Wed Apr 07 18:16:50 2010 +0100 @@ -44,6 +44,7 @@ my $CATEGORY_RAPTORWARNING = 'raptor_warning'; my $CATEGORY_RAPTORWARNING_MISSINGFLAGABIV2 = 'missing_enable_abiv2_mode'; my $CATEGORY_RAPTORWARNING_WHILESEARCHINGFORDEFFILEFILENOTFOUND = 'while_searching_for_deffile_file_not_found'; +my $CATEGORY_RAPTORWARNING_EXPORTUNFROZENPRESENT = 'exportunfrozen_present'; sub process { @@ -67,6 +68,12 @@ my $subcategory = $CATEGORY_RAPTORWARNING_WHILESEARCHINGFORDEFFILEFILENOTFOUND; RaptorCommon::dump_fault($category, $subcategory, $severity, $logfile, $component, $mmp, $phase, $recipe, $file); } + elsif ($text =~ m,EXPORTUNFROZEN present in .*,) + { + $severity = $RaptorCommon::SEVERITY_MAJOR; + my $subcategory = $CATEGORY_RAPTORWARNING_EXPORTUNFROZENPRESENT; + RaptorCommon::dump_fault($category, $subcategory, $severity, $logfile, $component, $mmp, $phase, $recipe, $file); + } else # log everything by default { RaptorCommon::dump_fault($category, $subcategory, $severity, $logfile, $component, $mmp, $phase, $recipe, $file);