Mercurial > hg > octave-lojdl
changeset 14644:f49e47ab83ca
maint: Rename mygethelp function to gethelp in scripts/mkdoc.pl
* scripts/mkdoc.pl: Rename mygethelp function to gethelp in scripts/mkdoc.pl
author | Rik <octave@nomad.inbox5.com> |
---|---|
date | Wed, 16 May 2012 17:24:59 -0700 |
parents | d4b4080faa47 |
children | cbc00b587f36 |
files | scripts/mkdoc.pl |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/mkdoc.pl +++ b/scripts/mkdoc.pl @@ -50,7 +50,7 @@ $fcn = $4; } - @help_txt = mygethelp ($fcn, $full_fname); + @help_txt = gethelp ($fcn, $full_fname); next MFILE if ($help_txt[0] eq ""); print "$fcn\n"; @@ -69,7 +69,7 @@ ################################################################################ # Subroutines ################################################################################ -sub mygethelp +sub gethelp { ($fcn, $fname) = @_[0..1]; open (FH, $fname) or return "";