Attachment 58539 Details for Bug 17447 – Bug 17447: %opt is unused

[patch] Bug 17447: %opt is unused

Bug-17447-opt-is-unused.patch (text/plain), 1.24 KB, created by Kyle M Hall (khall) on 2016-12-30 18:00:36 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Kyle M Hall (khall)

Created: 2016-12-30 18:00:36 UTC

Size: 1.24 KB

patch

obsolete

>From 153a915e67d449b83948f0d00a8e4d05b99b04f5 Mon Sep 17 00:00:00 2001
>From: Mark Tompsett <mtompset@hotmail.com>
>Date: Fri, 30 Dec 2016 10:12:24 -0500
>Subject: [PATCH] Bug 17447: %opt is unused
>
>Deleted the line.
>perlcritic -4 before and after.
>Before there are issues. After there is not.
>
>Also, changed function to not rely on implicit return value
>of last line, but explicitly stated a return. And operator
>changed, due to precedence issues.
>
>Signed-off-by: Mark Tompsett <mtompset@hotmail.com>
>Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
>
>Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
>---
> misc/batchRebuildItemsTables.pl | 3 +--
> 1 file changed, 1 insertion(+), 2 deletions(-)
>
>diff --git a/misc/batchRebuildItemsTables.pl b/misc/batchRebuildItemsTables.pl
>index a18e321..9e38757 100755
>--- a/misc/batchRebuildItemsTables.pl
>+++ b/misc/batchRebuildItemsTables.pl
>@@ -34,7 +34,6 @@ my $count      = 0;
> my $errorcount = 0;
> my $starttime  = gettimeofday;
> my @errors;
>-my %opt;
> my ( $confirm, $help, $test_parameter, $where );
> GetOptions(
>     'c'       => \$confirm,
>@@ -110,5 +109,5 @@ if ( scalar(@errors) > 0 ) {
> 
> sub defnonull {
>     my $var = shift;
>-    defined $var and $var ne "";
>+    return defined $var && $var ne q{};
> }
>-- 
>2.1.4

Actions: View | Diff | Splinter Review

Attachments on bug 17447: 56516 | 56578 | 58523 | 58524 | 58528 | 58529 | 58530 | 58531 | 58532 | 58533 | 58534 | 58537 | 58538 | 58539