(live_patch_URPM) split it out of upgrading_redhat()

diff --git a/perl-install/install/steps.pm b/perl-install/install/steps.pm
index 15d8d43..81daf68 100644
--- a/perl-install/install/steps.pm
+++ b/perl-install/install/steps.pm
@@ -277,10 +277,7 @@ sub choosePackages {
     $availableCorrected;
 }
 
-sub upgrading_redhat() {
-    #- remove weird config files that bother Xconfig::* too much
-    unlink "$::prefix/etc/X11/XF86Config";
-    unlink "$::prefix/etc/X11/XF86Config-4";
+sub live_patch_URPM() {
 
     sub prefering_mga {
 	my ($lpkg, $rpkg_ver, $c) = @_;
@@ -314,6 +311,13 @@ sub upgrading_redhat() {
     };
 }
 
+sub upgrading_redhat() {
+    #- remove weird config files that bother Xconfig::* too much
+    unlink "$::prefix/etc/X11/XF86Config";
+    unlink "$::prefix/etc/X11/XF86Config-4";
+    live_patch_URPM();
+}
+
 sub beforeInstallPackages {
     my ($o) = @_;