add some spacing

1 files changed, 6 insertions, 0 deletions

diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm
index 5f29c4eab..e340a8b7c 100644
--- a/perl-install/install/steps_interactive.pm
+++ b/perl-install/install/steps_interactive.pm
@@ -198,6 +198,7 @@ sub _check_unsafe_upgrade_and_warn {
     my ($o, $part) = @_;
     !_is_unsafe_upgrade($part) || _warn_unsafe_upgrade($o);
 }
+
 sub _is_unsafe_upgrade {
     my ($part) = @_;
 
@@ -206,6 +207,7 @@ sub _is_unsafe_upgrade {
     log::l("block_size $block_size");
     $block_size == 1024;
 }
+
 sub _warn_unsafe_upgrade {
     my ($o) = @_;
 
@@ -388,6 +390,7 @@ sub selectSupplMedia {
     my ($o) = @_;
     install::any::selectSupplMedia($o);
 }
+
 #------------------------------------------------------------------------------
 sub choosePackages {
     my ($o) = @_;
@@ -447,6 +450,7 @@ sub choosePackagesTree {
 			    sort => 1,
 			   });
 }
+
 sub loadSavePackagesOnFloppy {
     my ($o, $packages) = @_;
     $o->ask_from('', 
@@ -472,6 +476,7 @@ The format is the same as auto_install generated files."),
 	install::any::g_default_packages($o);
     }
 }
+
 sub _chooseDesktop {
     my ($o, $rpmsrate_flags_chosen, $chooseGroups) = @_;
 
@@ -507,6 +512,7 @@ sub _chooseDesktop {
 	$$chooseGroups = 1;
     }
 }
+
 sub chooseGroups {
     my ($o, $packages, $compssUsers, $individual) = @_;