From owner-freebsd-bugs  Mon Aug 17 05:30:07 1998
Return-Path: <owner-freebsd-bugs@FreeBSD.ORG>
Received: (from majordom@localhost)
          by hub.freebsd.org (8.8.8/8.8.8) id FAA01458
          for freebsd-bugs-outgoing; Mon, 17 Aug 1998 05:30:07 -0700 (PDT)
          (envelope-from owner-freebsd-bugs@FreeBSD.ORG)
Received: from freefall.freebsd.org (freefall.FreeBSD.ORG [204.216.27.21])
          by hub.freebsd.org (8.8.8/8.8.8) with ESMTP id FAA01401
          for <freebsd-bugs@FreeBSD.org>; Mon, 17 Aug 1998 05:30:04 -0700 (PDT)
          (envelope-from gnats@FreeBSD.org)
Received: (from gnats@localhost)
	by freefall.freebsd.org (8.8.8/8.8.5) id FAA02404;
	Mon, 17 Aug 1998 05:30:00 -0700 (PDT)
Received: from Berkeley.Gambit.Msk.SU (berkeley.gambit.msk.su [194.190.206.1])
          by hub.freebsd.org (8.8.8/8.8.8) with ESMTP id FAA01147
          for <FreeBSD-gnats-submit@freebsd.org>; Mon, 17 Aug 1998 05:27:30 -0700 (PDT)
          (envelope-from laskavy@Berkeley.Gambit.Msk.SU)
Received: (from laskavy@localhost)
	by Berkeley.Gambit.Msk.SU (8.8.8/8.8.8) id QAA13797;
	Mon, 17 Aug 1998 16:26:50 +0400 (MSD)
	(envelope-from laskavy)
Message-Id: <199808171226.QAA13797@Berkeley.Gambit.Msk.SU>
Date: Mon, 17 Aug 1998 16:26:50 +0400 (MSD)
From: "Сергей С. Ласкавый" <laskavy@Berkeley.Gambit.Msk.SU>
Reply-To: laskavy@Berkeley.Gambit.Msk.SU
To: FreeBSD-gnats-submit@FreeBSD.ORG
X-Send-Pr-Version: 3.2
Subject: bin/7644: catman can't work with ":" in man page name (perl man pages)
Sender: owner-freebsd-bugs@FreeBSD.ORG
Precedence: bulk
X-Loop: FreeBSD.org


>Number:         7644
>Category:       bin
>Synopsis:       catman can't work with ":" in man page name (perl man pages)
>Confidential:   no
>Severity:       non-critical
>Priority:       low
>Responsible:    freebsd-bugs
>State:          open
>Quarter:
>Keywords:
>Date-Required:
>Class:          sw-bug
>Submitter-Id:   current-users
>Arrival-Date:   Mon Aug 17 05:30:00 PDT 1998
>Last-Modified:
>Originator:     Сергей Ласкавый
>Organization:
The FreeBSD Documentation Project
>Release:        FreeBSD 2.2.6-RELEASE i386
>Environment:

/usr/bin/catman:
     $Id: catman.perl,v 1.8 1996/08/27 20:04:01 wosch Exp $

>Description:

	catman can't work with ":" in man page name

>How-To-Repeat:

	$ catman /usr/local/lib/perl5/man

>Fix:

--- catman.orig	Wed Mar 25 03:52:39 1998
+++ catman	Mon Aug  3 16:50:19 1998
@@ -228,7 +228,7 @@
 	next if $file eq "." || $file eq "..";
 
 	# fo_09-o.bar0
-	if ($file !~ /^[\w\-\+\[\.]+\.\w+$/) {
+	if ($file !~ /^[\w\-\+\:\[\.]+\.\w+$/) {
 	    &garbage("$mandir/$file", "Assume garbage")
 		unless -d "$mandir/$file";
 	    next;
@@ -285,7 +285,7 @@
     foreach $file (readdir(D)) {
 	next if $file =~ /^(\.|\.\.)$/;	# skip current and parent directory
 
-	if ($file !~ /^[\w\-\+\[\.]+\.\w+$/) {
+	if ($file !~ /^[\w\-\+\:\[\.]+\.\w+$/) {
 	    &garbage("$catdir/$file", "Assume garbage")
 		unless -d "$catdir/$file";
 	    next;
>Audit-Trail:
>Unformatted:

To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-bugs" in the body of the message