Bug 33285: (QA follow-up) add POD and fix some code style
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com> Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io> (cherry picked from commit6221538b6d
) Signed-off-by: Jacob O'Mara <jacobomara901@gmail.com> (cherry picked from commit4a1c87fe36
) Signed-off-by: Lucas Gass <lucas@bywatersolutions.com> (cherry picked from commitbe2a56a4b7
) Signed-off-by: Arthur Suzuki <arthur.suzuki@biblibre.com>
This commit is contained in:
parent
d209b1a788
commit
0101bbd4cc
1 changed files with 7 additions and 3 deletions
|
@ -94,7 +94,11 @@ Verbose. Without this flag set, only fatal errors are reported.
|
|||
|
||||
=item B<--format>
|
||||
|
||||
Current options are text, html, csv, and tsv. At the moment, text and tsv both produce tab-separated tab-separated output.
|
||||
Current options are text, html, csv, and tsv. At the moment, text and tsv both produce tab-separated output.
|
||||
|
||||
=item B<--separator>
|
||||
|
||||
Separator character, only for csv format. Default to comma.
|
||||
|
||||
=item B<--email>
|
||||
|
||||
|
@ -224,8 +228,8 @@ unless ($format) {
|
|||
$format = 'text';
|
||||
}
|
||||
|
||||
if( $csv_separator ){
|
||||
if( $format eq 'csv' ) {
|
||||
if ($csv_separator) {
|
||||
if ( $format eq 'csv' ) {
|
||||
$separator = "$csv_separator";
|
||||
} else {
|
||||
print STDERR "Cannot specify separator if not using CSV format\n";
|
||||
|
|
Loading…
Reference in a new issue