File tree Expand file tree Collapse file tree 1 file changed +5
-5
lines changed
Expand file tree Collapse file tree 1 file changed +5
-5
lines changed Original file line number Diff line number Diff line change @@ -109,7 +109,7 @@ sub checkmanpage {
109109 my $line = 1;
110110 while (<$mh >) {
111111 # strip off formatting
112- $_ =~ s /\\ f[BPRI] / / ;
112+ $_ =~ s /(^|[^A-Z0-9])[*_]+ / / ;
113113 # detect global-looking 'CURL[BLABLA]_*' symbols
114114 while (s /\W (CURL(AUTH|E|H|MOPT|OPT|SHOPT|UE|M|SSH|SSLBACKEND|HEADER|FORM|FTP|PIPE|MIMEOPT|GSSAPI|ALTSVC|PROTO|PROXY|UPART|USESSL|_READFUNC|_WRITEFUNC|_CSELECT|_FORMADD|_IPRESOLVE|_REDIR|_RTSPREQ|_TIMECOND|_VERSION)_[a-zA-Z0-9_]+)// ) {
115115 my $s = $1 ;
@@ -123,11 +123,11 @@ sub checkmanpage {
123123 close ($mh );
124124}
125125
126- sub scanman3dir {
126+ sub scanman_md_dir {
127127 my ($d ) = @_ ;
128128 opendir (my $dh , $d ) ||
129129 die " Can't opendir: $! " ;
130- my @mans = grep { / .3 \z / } readdir ($dh );
130+ my @mans = grep { / .md \z / } readdir ($dh );
131131 closedir $dh ;
132132 for my $m (@mans ) {
133133 checkmanpage(" $d /$m " );
@@ -136,8 +136,8 @@ sub scanman3dir {
136136
137137
138138scanallheaders();
139- scanman3dir (" $root /docs/libcurl" );
140- scanman3dir (" $root /docs/libcurl/opts" );
139+ scanman_md_dir (" $root /docs/libcurl" );
140+ scanman_md_dir (" $root /docs/libcurl/opts" );
141141
142142open my $s , " <" , " $root /docs/libcurl/symbols-in-versions" ;
143143while (<$s >) {
You can’t perform that action at this time.
0 commit comments