7 # Initialize the numeric register we use for conditionals
9 $_ = ".nr SL \@SEMAN\@\n.nr BA \@BAMAN\@\n.nr LC \@LCMAN\@\n.\\\"\n$_";
13 # Make SELinux_Spec conditional
14 if (/(.*)SELinux_Spec\? (.*)$/) {
15 $_ = ".ie \\n(SL $_.el $1$2\n";
16 } elsif (/^(.*SELinux_Spec ::=)/) {
17 $_ = ".if \\n(SL \\{\\\n$_";
18 } elsif (/^(.*Tag_Spec ::=)/) {
22 if (/^\.S[Sh] "SELinux_Spec"/) {
23 $_ = ".if \\n(SL \\{\\\n$_";
25 } elsif (/^\.IP "(role|type)"/) {
26 $_ = ".if \\n(SL \\{\\\n$_";
28 } elsif (/^\.IP "use_loginclass"/) {
29 $_ = ".if \\n(LC \\{\\\n$_";
31 } elsif ($cond && /^\.(Sh|SS|IP|PP)/) {
36 # Fix up broken pod2man formatting of F<@foo@/bar>
37 s/\\fI\\f(\(C)?I\@([^\@]*)\\fI\@/\\fI\@$2\@/g;
38 s/\\f\(\CW\@([^\@]*)\\fR\@/\@$1\@/g;
39 #\f(CW@secure_path\fR@