if ($section ne '') {
$section=~s:/:\\/:g; # allow / in section.
+ $section=~s/\&/\\&/g; # escape sed specials
+ $section=~s/(\\[0-9])/\\\\$1/g; # more sed specials
autoscript($package,"postinst","postinst-info",
"s/#SECTION#/$section/g;s:#FILE#:$fn:");
}
=head1 SEE ALSO
-L<debhelper(1)>
+L<debhelper(7)>
This program is a part of debhelper.