@@ -229,7 +229,7 @@ sub ProcessFile
229229 {
230230 # The general idea is we gather the whole doxygen comment in to an array and process
231231 # that array all at once in the _ProcessDoxygenCommentBlock. This way we do not have
232- # to artifically keep track of what type of comment block it is between each line
232+ # to artificially keep track of what type of comment block it is between each line
233233 # that we read from the file.
234234 $logger -> debug(" End of Doxygen Comment Block" );
235235 $self -> _ProcessDoxygenCommentBlock();
@@ -504,7 +504,7 @@ sub _ChangeState
504504 }
505505 else
506506 {
507- # If nothing is passed in, lets set the current state to the preivous state.
507+ # If nothing is passed in, lets set the current state to the previous state.
508508 $logger -> debug(" No state passed in, lets revert to previous state" );
509509 my $previous = pop @{$self -> {' _sPreviousState' }};
510510 if (defined $previous )
@@ -610,9 +610,7 @@ sub _PrintMethodBlock
610610 # ** @method private _PrintMethodBlock ($class, $methodDef)
611611 # This method will print the various subroutines/functions/methods in apprporiate doxygen syntax
612612 # @param class - required string (name of the class)
613- # @param state - required string (current state)
614- # @param type - required string (type)
615- # @param method - required string (name of method)
613+ # @param methodDef - required string (name of method)
616614 # *
617615 my $self = shift ;
618616 my $class = shift ;
@@ -690,7 +688,7 @@ sub _ProcessPerlMethod
690688{
691689 # ** @method private _ProcessPerlMethod ($line)
692690 # This method will process the contents of a subroutine/function/method and try to figure out
693- # the name and wether or not it is a private or public method. The private or public status,
691+ # the name and whether or not it is a private or public method. The private or public status,
694692 # if not defined in a doxygen comment block will be determined based on the file name. As with
695693 # C and other languages, an "_" should be the first character for all private functions/methods.
696694 # @param line - required string (full line of code)
@@ -796,9 +794,9 @@ sub _ProcessPerlMethod
796794 $logger ->debug("A subroutine has been started but we are not yet in it as we have yet to see an open brace");
797795 }
798796
799- # Doxygen makes use of the @ symbol and treats it as a special reserved character. This is a problem for perl
800- # and especailly when we are documenting our own Doxygen code we have print statements that include things like @endcode
801- # as is found in _PrintMethodBlock(). Lets convert those @ to @amp ;
797+ # Doxygen makes use of the `@` symbol and treats it as a special reserved character. This is a problem for perl
798+ # and especially when we are documenting our own Doxygen code we have print statements that include things like ` @endcode `
799+ # as is found in _PrintMethodBlock(). Lets convert those `@` to ` @amp ;`
802800 $line =~ s/\@ endcode/\&\# 64\; endcode/g ;
803801
804802 # Record the current line for code output
@@ -1095,7 +1093,7 @@ sub _ConvertToOfficialDoxygenSyntax
10951093{
10961094 # ** @method private _ConvertToOfficialDoxygenSyntax ($line)
10971095 # This method will check the current line for various unsupported doxygen comment blocks and convert them
1098- # to the type we support, ' #** @command' . The reason for this is so that we do not need to add them in
1096+ # to the type we support, #** @command. The reason for this is so that we do not need to add them in
10991097 # every if statement throughout the code.
11001098 # @param line - required string (line of code)
11011099 # @retval line - string (line of code)
@@ -1105,7 +1103,7 @@ sub _ConvertToOfficialDoxygenSyntax
11051103 my $logger = $self -> GetLogger($self );
11061104 $logger -> debug(" ### Entering _ConvertToOfficialDoxygenSyntax ###" );
11071105
1108- # This will match " ## @command" and convert it to " #** @command"
1106+ # This will match ## @command and convert it to #** @command
11091107 if ($line =~ / ^\s *##\s +\@ / ) { $line =~ s / ^(\s *)##(\s +\@ )/ $1 #\*\* $2 / ; }
11101108 else {
11111109 $logger -> debug(' Nothing to do, did not find any ## @' );
@@ -1225,9 +1223,9 @@ continuous "#" comment markers as a blank line can be used as a termination
12251223mark for the doxygen comment block.
12261224
12271225In other languages the Doxygen @fn structural indicator is used to document
1228- subroutines/functions/methods and the parsing engine figures out what is what.
1229- In Perl that is a lot harder to do so I have added a @method and @function
1230- structural indicator so that they can be documented seperatly.
1226+ subroutines/functions/methods and the parsing engine figures out what is what.
1227+ In Perl that is a lot harder to do so I have added a ` @method` and ` @function`
1228+ structural indicator so that they can be documented separately.
12311229
12321230=head2 Supported Structural Indicators
12331231
0 commit comments