From 08abc2e2a98d3fce6bb38439d9b2fbefd4ee4412 Mon Sep 17 00:00:00 2001 From: "Robin H. Johnson" Date: Sun, 9 Dec 2018 21:17:11 -0800 Subject: perl/sentry: fix whitespace Signed-off-by: Robin H. Johnson --- perl/sentry.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/perl/sentry.pl b/perl/sentry.pl index 3da9291..ad82570 100755 --- a/perl/sentry.pl +++ b/perl/sentry.pl @@ -52,11 +52,11 @@ if ( $DEBUG ) { } $oss_sth = $dbh->prepare($oss_sql); - $oss_sth->execute(); + $oss_sth->execute(); - while ( my $os = $oss_sth->fetchrow_hashref() ) { - $oss{$os->{os_id}} = $os->{os_name}; - } + while ( my $os = $oss_sth->fetchrow_hashref() ) { + $oss{$os->{os_id}} = $os->{os_name}; + } } # let's build the location information -- cgit v1.2.3-65-gdbad