d/freebsd-dev
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Support german mdoc man pages (currently no german mdoc man page exists).

Browse Source 
Support japanese FreeBSD man pages, Jpman Project.
This commit is contained in:
Wolfram Schneider 1997-03-14 21:58:43 +00:00
parent 670fdefe24
commit 2e6c23155e
Notes: svn2git 2020-12-20 02:59:44 +00:00 
svn path=/head/; revision=23890
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gnu/usr.bin/man/makewhatis/makewhatis.perl
View File

@ -26,7 +26,7 @@
#
# makewhatis -- update the whatis database in the man directories.
#
# $Id: makewhatis.perl,v 1.14 1997/03/01 15:20:50 wosch Exp $
# $Id: makewhatis.perl,v 1.11 1996/08/27 20:04:09 wosch Exp $
sub usage {
@ -337,7 +337,7 @@ sub manual {
while(<F>) {
# ``man'' style pages
# &&: it takes you only half the user time, regexp is slow!!!
if (/^\.SH/ && /^\.SH[ \t]+["]?(NAME|Name|NAMN|BEZEICHNUNG)["]?/) {
if (/^\.SH/ && /^\.SH[ \t]+["]?(NAME|Name|NAMN|BEZEICHNUNG|̾¾Î)["]?/) {
#while(<F>) { last unless /^\./ } # Skip
#chop; $list = $_;
while(<F>) {
@ -354,7 +354,7 @@ sub manual {
}
}
&out($list); close F; return 1;
} elsif (/^\.Sh/ && /^\.Sh[ \t]+["]?(NAME|Name)["]?/) {
} elsif (/^\.Sh/ && /^\.Sh[ \t]+["]?(NAME|Name|BEZEICHNUNG|̾¾Î)["]?/) {
# ``doc'' style pages
local($flag) = 0;
while(<F>) {