Changeset 14848


Ignore:
Timestamp:
Oct 27, 2005, 7:21:07 PM (15 years ago)
Author:
mww
Message:

compress 'cat'-manpages, too

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port1.0/portdestroot.tcl

    r14485 r14848  
    11# et:ts=4
    22# portdestroot.tcl
    3 # $Id: portdestroot.tcl,v 1.28 2005/10/08 21:29:35 jberry Exp $
     3# $Id: portdestroot.tcl,v 1.29 2005/10/27 19:21:07 mww Exp $
    44#
    55# Copyright (c) 2002 - 2003 Apple Computer, Inc.
     
    140140        set manlinks [list]
    141141        foreach mandir [readdir "${manpath}"] {
    142             if {![regexp {^man(.)$} ${mandir} match manindex]} { continue }
     142            if {![regexp {^(cat|man)(.)$} ${mandir} match ignore manindex]} { continue }
    143143            set mandirpath [file join ${manpath} ${mandir}]
    144144            if {[file isdirectory ${mandirpath}] && [file type ${mandirpath}] == "directory"} {
Note: See TracChangeset for help on using the changeset viewer.