summaryrefslogtreecommitdiffstats
path: root/unix/installManPage
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2018-08-29 18:07:14 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2018-08-29 18:07:14 (GMT)
commit2c081dcd0c8ec409e22ffbb1f49579b83ad3b79e (patch)
tree7726893008d42f6caa8839ec1d39afaaccc86632 /unix/installManPage
parentb880f036f945f9da77f73d3826046b6f1eb49a42 (diff)
parentce1c1edacbdc0ad1634a3de111ac872dc21f66cb (diff)
downloadtcl-2c081dcd0c8ec409e22ffbb1f49579b83ad3b79e.zip
tcl-2c081dcd0c8ec409e22ffbb1f49579b83ad3b79e.tar.gz
tcl-2c081dcd0c8ec409e22ffbb1f49579b83ad3b79e.tar.bz2
merge trunk
Diffstat (limited to 'unix/installManPage')
-rwxr-xr-xunix/installManPage43
1 files changed, 29 insertions, 14 deletions
diff --git a/unix/installManPage b/unix/installManPage
index 1f1cbde..09a31dd 100755
--- a/unix/installManPage
+++ b/unix/installManPage
@@ -60,20 +60,35 @@ test -z "$SymOrLoc" && SymOrLoc="$Dir/"
#
Names=`sed -n '
# Look for a line that starts with .SH NAME
- /^\.SH NAME/{
-# Read next line
- n
-# Remove all commas ...
- s/,//g
-# ... and backslash-escaped spaces.
- s/\\\ //g
-# Delete from \- to the end of line
- s/ \\\-.*//
-# Convert all non-space non-alphanum sequences
-# to single underscores.
- s/[^ A-Za-z0-9][^ A-Za-z0-9]*/_/g
-# print the result and exit
- p;q
+ /^\.SH NAME/,/^\./{
+
+
+ /^\./!{
+
+ # Remove all commas...
+ s/,//g
+
+ # ... and backslash-escaped spaces.
+ s/\\\ //g
+
+ /\\\-.*/{
+ # Delete from \- to the end of line
+ s/ \\\-.*//
+ h
+ s/.*/./
+ x
+ }
+
+ # Convert all non-space non-alphanum sequences
+ # to single underscores.
+ s/[^ A-Za-z0-9][^ A-Za-z0-9]*/_/g
+ p
+ g
+ /^\./{
+ q
+ }
+ }
+
}' $ManPage`
if test -z "$Names" ; then