Mercurial > octave
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*$/};