From a873f04a2e4d661387123f2bedab2551e71ad175 Mon Sep 17 00:00:00 2001 From: Michal Sojka Date: Tue, 9 Dec 2014 09:36:07 +0100 Subject: [PATCH] Minor refactoring --- novaboot | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) diff --git a/novaboot b/novaboot index 9cc5e1b..bd81271 100755 --- a/novaboot +++ b/novaboot @@ -13,6 +13,8 @@ # You should have received a copy of the GNU General Public License # along with this program. If not, see . +## Initialization + use strict; use warnings; use warnings (exists $ENV{NOVABOOT_TEST} ? (FATAL => 'all') : ()); @@ -552,6 +554,12 @@ sub system_verbose($) if ($ret) { die("Command failure $ret"); } } +sub trim($) { + my ($str) = @_; + $str =~ s/^\s+|\s+$//g; + return $str +} + ## WvTest headline if (exists $variables->{WVDESC}) { @@ -906,12 +914,6 @@ if ($variables->{WVTEST_TIMEOUT}) { print STDERR "wvtest: timeout ", $variables->{WVTEST_TIMEOUT}, "\n"; } -sub trim($) { - my ($str) = @_; - $str =~ s/^\s+|\s+$//g; - return $str -} - ### Start in Qemu if (defined $qemu) { -- 2.39.2