# the only thing we have to make sure is that if we copy /*...*/
# comments that doxygen doesn't get confused; do so by simply
# adding a space
+ #
+ # we also need to somehow strip the $ signs out of the svn Id: string
+ # to avoid trouble
if ( ! m!^\s*//! ) {
s!/\*!/ \*!g;
s!\*/!\* /!g;
+
+ s!\$Id:(.*)\$!Subversion Id: \1!g;
print " * $_";
} else {
# for comments, all we do is replace section headers, and
+++ /dev/null
-#---------------------------------------------------------------------------
-# $Id$
-# Version: $Name$
-#
-# Copyright (C) 2006, 2007 by the deal.II authors
-#
-# This file is subject to QPL and may not be distributed
-# without copyright and license information. Please refer
-# to the file deal.II/doc/license.html for the text and
-# further information on this license.
-#
-#---------------------------------------------------------------------------
-
-print "<p>\n";
-print "<pre><code>\n";
-
-
-while (<>) {
- # ignore comment lines
- if ( ! m!^\s*//! ) {
- # substitute special characters
- s/&/&/g;
- s/</</g;
- s/>/>/g;
- s/\$/\\$/g;
- s/\t/ /g;
-
- print " $_";
- } else {
- # second, replace section headers, and generate addressable
- # anchor
- if ( /\@sect/ ) {
- m!\@sect(\d)\{(.*)\}\s*$!;
- $sect_name = $2;
-
- # for the anchor, use the name of the section but discard
- # everything except for letters, numbers, and underscores
- $sect_name =~ s/[^a-zA-Z0-9_]//g;
-
- print "\n<a name=\"plain-$sect_name\"></a>\n";
- }
- }
-}
-
-print "</code></pre>\n</p>\n\n";