diff options
-rw-r--r-- | qarepo.pl | 13 |
1 files changed, 13 insertions, 0 deletions
@@ -318,6 +318,8 @@ sub disable { } sub enable { + check_no_testing_media("This may enable unwanted packages to be installed.") + or return; disable_buttons(); get_settings(); if (sync_repo()) { @@ -354,6 +356,17 @@ sub error_dismiss { # Subsidiary Functions ############################################################################### +sub check_no_testing_media { + my ($message2) = @_; + if (system("urpmq --list-url | grep -q updates_testing") == 0) { + my $message1 = "Some updates_testing media are enabled."; + my $message3 = "Please disable these media and try again."; + show_error_dialogue(($message1, $message2, $message3)); + return 0; + } + 1; +} + sub set_qa_repo_info { $qa_repo_name = $qa_repo_names{$arch}; |