# HG changeset patch # User Dario Sestito # Date 1270660610 -3600 # Node ID 6669177dab5476c4c52ffcf0d03a0a5962761109 # Parent ba90e30c0f3ca4eaec3ace210aad8d29d2916c28 Add new exportunfrozen_present category for Raptor warnings 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);