]> https://gitweb.dealii.org/ - dealii-svn.git/commitdiff
Skip the entire first comment block, which is necessary since Guido's
authorwolf <wolf@0785d39b-7218-0410-832d-ea1e28bc413d>
Wed, 18 Jan 2006 15:54:32 +0000 (15:54 +0000)
committerwolf <wolf@0785d39b-7218-0410-832d-ea1e28bc413d>
Wed, 18 Jan 2006 15:54:32 +0000 (15:54 +0000)
November changes.

git-svn-id: https://svn.dealii.org/trunk@12087 0785d39b-7218-0410-832d-ea1e28bc413d

deal.II/doc/tutorial/chapter-2.step-by-step/program2html
deal.II/doc/tutorial/chapter-2.step-by-step/program2plain

index 24de747a27f8bdd1c9f5d9dcaf7122688c7315df..a9c67348f025b5143516607f6ffc380ec72f579d 100644 (file)
@@ -6,7 +6,7 @@ print "<h1> The commented program</h1>\n";
 # ignore comments at the start of the program. this includes CVS
 # tags and copyright notices.
 $_ = <>;
-while ( m!^/[/\*]!  ||  m/^$/ ) {
+while ( m!^/[/\*]!  ||  m!\s*\*! || m/^$/ ) {
     $_ = <>;
 }
 
index 1b99048e5f18125418df62ef7c9657f977b9fc97..52819ff606cda1eeee2f79c3d31c7ecc72f5c813 100644 (file)
@@ -3,7 +3,7 @@
 # ignore comments at the start of the program. this includes CVS
 # tags and copyright notices.
 $_ = <>;
-while ( m!^/[/\*]!  ||  m/^$/ ) {
+while ( m!^/[/\*]!  ||  m!\s*\*! || m/^$/ ) {
     $_ = <>;
 }
 

In the beginning the Universe was created. This has made a lot of people very angry and has been widely regarded as a bad move.

Douglas Adams


Typeset in Trocchi and Trocchi Bold Sans Serif.