diff scripts/mk-doc.pl @ 27923:bd51beb6205e

update formatting of copyright notices * Use <https://octave.org/copyright/> instead of <https://octave.org/COPYRIGHT.html/>. * For consistency with other comments in the Octave sources, use C++-style comments for copyright blocks in C and C++ files. * Use delimiters above and below copyright blocks that are appropriate for the language used in the file. * Eliminate extra spacing inside copyright blocks. * lex.ll (looks_like_copyright): Also allow newlines and carriage returns before the word "Copyright". * scripts/mk-doc.pl (gethelp): Also skip empty comment lines. * bp-table.cc, type.m: Adjust tests.
author John W. Eaton <jwe@octave.org>
date Wed, 08 Jan 2020 11:59:41 -0500
parents 1891570abac8
children 3ed6fc50d8ae
line wrap: on
line diff
--- a/scripts/mk-doc.pl	Wed Jan 08 14:02:16 2020 -0500
+++ b/scripts/mk-doc.pl	Wed Jan 08 11:59:41 2020 -0500
@@ -1,11 +1,12 @@
 #! /usr/bin/perl
 use utf8;
 
+########################################################################
+#
 # Copyright (C) 2012-2020 The Octave Project Developers
 #
-# See the file COPYRIGHT.md in the top-level directory of this distribution
-# or <https://octave.org/COPYRIGHT.html/>.
-#
+# See the file COPYRIGHT.md in the top-level directory of this
+# distribution or <https://octave.org/copyright/>.
 #
 # This file is part of Octave.
 #
@@ -22,6 +23,8 @@
 # You should have received a copy of the GNU General Public License
 # along with Octave; see the file COPYING.  If not, see
 # <https://www.gnu.org/licenses/>.
+#
+########################################################################
 
 use strict;
 use warnings;
@@ -103,7 +106,7 @@
   my @help_txt;
   while (my $line = <$fh>)
     {
-      next if $line =~ m/^\s*$/;      # skip empty lines
+      next if $line =~ m/^[\s#%]*$/;  # skip empty lines
       last if $line !~ m/^\s*(#|%)/;  # out of here once code starts
 
       my $reading_block = sub {defined ($line = <$fh>) && $line !~ m/^\s*$/};