From 3f9fdaca2f1b3262f4b978445a906376d887d7e2 Mon Sep 17 00:00:00 2001 From: Peter Hawkins Date: Wed, 5 Aug 1998 03:44:46 +0000 Subject: [PATCH] PR: 7488 Submitted by: lhecking@nmrc.ucc.ie merge from stable --- gnu/usr.bin/man/catman/catman.perl | 4 ++-- gnu/usr.bin/man/makewhatis/makewhatis.perl | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/gnu/usr.bin/man/catman/catman.perl b/gnu/usr.bin/man/catman/catman.perl index f1645f9635da..d94f94927cb5 100644 --- a/gnu/usr.bin/man/catman/catman.perl +++ b/gnu/usr.bin/man/catman/catman.perl @@ -26,7 +26,7 @@ # # /usr/bin/catman - preformat man pages # -# $Id: catman.perl,v 1.10 1997/02/22 15:47:00 peter Exp $ +# $Id: catman.perl,v 1.11 1998/05/01 13:27:27 des Exp $ sub usage { @@ -176,7 +176,7 @@ sub catdir_create { $catdir = &man2cat($subdir); if (-d $catdir) { return 1 if -w _; - if (!chmod(755, $catdir)) { + if (!chmod(0755, $catdir)) { warn "Cannot write $catdir, chmod: $!\n"; $exit = 1; return 0; diff --git a/gnu/usr.bin/man/makewhatis/makewhatis.perl b/gnu/usr.bin/man/makewhatis/makewhatis.perl index b3ceeaa20ca7..841c2c0e6e16 100644 --- a/gnu/usr.bin/man/makewhatis/makewhatis.perl +++ b/gnu/usr.bin/man/makewhatis/makewhatis.perl @@ -26,13 +26,13 @@ # # makewhatis -- update the whatis database in the man directories. # -# $Id: makewhatis.perl,v 1.16 1997/03/14 21:58:43 wosch Exp $ +# $Id: makewhatis.perl,v 1.17 1997/07/04 22:32:59 wosch Exp $ sub usage { warn <