Mercurial > ecos

comparison packages/pkgconf/fixhtml.tcl @ 208:e0c0827131d1 ecos

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from eCos master repository on 2002-05-20-20:11:54-BST
author jlarmour
date Mon, 20 May 2002 22:19:26 +0000
parents 67850532eebb
children d2c90368aeef
comparison
equal deleted inserted replaced
207:74c807ddde34 208:e0c0827131d1
7 # fixhtml.tcl 7 # fixhtml.tcl
8 # 8 #
9 # Patch HTML files generated from DocBook sources. 9 # Patch HTML files generated from DocBook sources.
10 # 10 #
11 #=============================================================================== 11 #===============================================================================
12 #####COPYRIGHTBEGIN#### 12 #####ECOSGPLCOPYRIGHTBEGIN####
13 # 13 # -------------------------------------------
14 # =============================================================== 14 # This file is part of eCos, the Embedded Configurable Operating System.
15 # Copyright (C) 2000, 2001 Red Hat, Inc. 15 # Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
16 # 16 #
17 # This file is part of the eCos host tools. 17 # eCos is free software; you can redistribute it and/or modify it under
18 # the terms of the GNU General Public License as published by the Free
19 # Software Foundation; either version 2 or (at your option) any later version.
18 # 20 #
19 # This program is free software; you can redistribute it and/or 21 # eCos is distributed in the hope that it will be useful, but WITHOUT ANY
20 # modify it under the terms of the GNU General Public License as 22 # WARRANTY; without even the implied warranty of MERCHANTABILITY or
21 # published by the Free Software Foundation; either version 2 of 23 # FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
22 # the License, or (at your option) any later version. 24 # for more details.
23 #
24 # This program is distributed in the hope that it will be useful,
25 # but WITHOUT ANY WARRANTY; without even the implied warranty of
26 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
27 # GNU General Public License for more details.
28 # 25 #
29 # You should have received a copy of the GNU General Public 26 # You should have received a copy of the GNU General Public License along
30 # License along with this program; if not, write to the Free 27 # with eCos; if not, write to the Free Software Foundation, Inc.,
31 # Software Foundation, Inc., 59 Temple Place - Suite 330, 28 # 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
32 # Boston, MA 02111-1307, USA.
33 # 29 #
34 # =============================================================== 30 # As a special exception, if other files instantiate templates or use macros
31 # or inline functions from this file, or you compile this file and link it
32 # with other works to produce a work based on this file, this file does not
33 # by itself cause the resulting work to be covered by the GNU General Public
34 # License. However the source code for this file must still be made available
35 # in accordance with section (3) of the GNU General Public License.
35 # 36 #
36 #####COPYRIGHTEND#### 37 # This exception does not invalidate any other reasons why a work based on
38 # this file might be covered by the GNU General Public License.
39 #
40 # Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
41 # at http://sources.redhat.com/ecos/ecos-license
42 # -------------------------------------------
43 #####ECOSGPLCOPYRIGHTEND####
37 #=============================================================================== 44 #===============================================================================
38 ######DESCRIPTIONBEGIN#### 45 ######DESCRIPTIONBEGIN####
39 # 46 #
40 # Author(s): bartv 47 # Author(s): bartv
41 # Contributors: bartv 48 # Contributors: bartv
117 regsub -all "+" $data "\\+" data 124 regsub -all "+" $data "\\+" data
118 regsub -all "%" $data "\\%" data 125 regsub -all "%" $data "\\%" data
119 regsub -all "$" $data "\\$" data 126 regsub -all "$" $data "\\$" data
120 regsub -all "│" $data "\\│" data 127 regsub -all "│" $data "\\│" data
121 regsub -all "\" $data "\\\" data 128 regsub -all "\" $data "\\\" data
129 regsub -all "█" $data "\\█" data
130 regsub -all "▮" $data "\\▮" data
122 131
123 # Now write the data back to the file. Do not bother to 132 # Now write the data back to the file. Do not bother to
124 # keep an old version lying around, the html files can be 133 # keep an old version lying around, the html files can be
125 # regenerated easily enough. 134 # regenerated easily enough.
126 set fd [open $file "w"] 135 set fd [open $file "w"]