[devel] Perl 5.18.1 breakage

[Vladimir Lettiev]

On Thu, Sep 12, 2013 at 11:01:00PM +0400, Dmitry V. Levin wrote:
> On Thu, Sep 12, 2013 at 02:42:21PM +0400, Vladimir Lettiev wrote:
> > Пришёл довольно пухлый лог о сломанных пакетах.
> 
> Из того, что не упомянуто в отчете: из пакета vim-common-7.3.353-alt3
> исчезло все содержимое /usr/share/man/.

Это проблема в find-lang, возникла после этого коммита:
http://git.altlinux.org/gears/r/rpm.git?p=rpm.git;a=commitdiff;h=9e3d656706e79132b8b6a17dca613bb728d19197

Надо или откатить или поправить регулярки для man-страниц:

@@ -205,17 +205,17 @@
 		find "$TOPDIR" -type f |sed -e '
 s:'"$TOPDIR"'::
 s:^[^/].*::
-s:\(.*/share/man/'"$RLOCALE"'/[^/]\+/'"$PATTERN"'\.[0-9a-z]\+\)\(\.[^/]\+\)\?$:%lang(\2) \1*:
+s:\(.*/share/man/'"$RLOCALE"'.\+'"$PATTERN"'\.[0-9a-z]\+\)\(\.[^/]\+\)\?$:%lang(\2) \1*:
 s:^[^%].*::
-s:^%lang(en) ::
+s:^%lang(\(en\|man.*\)) ::
 /^$/d
 		'
 		find "$TOPDIR" -type l |sed -e '
 s:'"$TOPDIR"'::
 s:^[^/].*::
-s:\(.*/share/man/'"$RLOCALE"'/[^/]\+/'"$PATTERN"'\.[0-9a-z]\+\)\(\.[^/]\+\)\?$:%lang(\2) %attr(-,root,root) \1*:
+s:\(.*/share/man/'"$RLOCALE"'.\+'"$PATTERN"'\.[0-9a-z]\+\)\(\.[^/]\+\)\?$:%lang(\2) %attr(-,root,root) \1*:
 s:^[^%].*::
-s:^%lang(en) ::
+s:^%lang(\(en\|man.*\)) ::
 /^$/d
 		'
 	fi >> "$OUTFILE"


-- 
Vladimir Lettiev aka crux ✉ theCrux на gmail.com