Fix cl-unmask

install/calculate

@@ -4540,11 +4540,11 @@ sub emerge_pretend{
 		   m/resulting in a slot conflict:/
 		){
 			$err++; last;
-		}elsif(m/^- ([^ ]+)-[0-9\._pb]+(_pre[0-9]+)?(_rc[0-9]{1,2})?(-r[0-9]{1,2})?(_beta[0-9]{1,2})? .+masked by: package.mask/){
+		}elsif(m/^- ([^ ]+)-[0-9\._a-z]+(_pre[0-9]+)?(_rc[0-9]{1,2})?(-r[0-9]{1,2})?(_beta[0-9]{1,2})? .+masked by: package.mask/){
 			return $1, 'unmask';
-		}elsif(m/^- ([^ ]+)-[0-9\._pb]+(_pre[0-9]+)?(_rc[0-9]{1,2})?(-r[0-9]{1,2})?(_beta[0-9]{1,2})? .+masked by: $data{unmask} keyword/){
+		}elsif(m/^- ([^ ]+)-[0-9\._a-z]+(_pre[0-9]+)?(_rc[0-9]{1,2})?(-r[0-9]{1,2})?(_beta[0-9]{1,2})? .+masked by: $data{unmask} keyword/){
 			return $1, 'keywords';
-		}elsif(m/'([^ ]+)-[0-9\._pb]+(_pre[0-9]+)?(_rc[0-9]{1,2})?(-r[0-9]{1,2})?(_beta[0-9]{1,2})?'.+ pulled in by/
+		}elsif(m/'([^ ]+)-[0-9\._a-z]+(_pre[0-9]+)?(_rc[0-9]{1,2})?(-r[0-9]{1,2})?(_beta[0-9]{1,2})?'.+ pulled in by/
 			&& !m/kde-base\/kdelibs-3.5/){
 			my $movie; #отметим зависимый пакет, который должен располагаться сверху списка, чтобы избежать ошибки
 			foreach(@packages){