From 5e9764e1bde5234a92b083eac60c343e5de514f2 Mon Sep 17 00:00:00 2001 From: Dirk Mueller Date: Fri, 18 Aug 2006 14:42:59 +0000 Subject: [PATCH] various fixlets svn path=/trunk/KDE/kdesdk/scripts/kdesvn-build; revision=574253 --- kdesvn-build | 13 +++++++------ kdesvn-build-coverity | 9 +++++---- 2 files changed, 12 insertions(+), 10 deletions(-) diff --git a/kdesvn-build b/kdesvn-build index 8c04561..3ea5304 100755 --- a/kdesvn-build +++ b/kdesvn-build @@ -572,7 +572,7 @@ sub module_uses_cmake { my $module = shift; my $user_choice = get_option($module, 'use-cmake'); - + return $user_choice if defined $user_choice and $user_choice ne ""; my $srcdir = get_fullpath($module, 'source'); @@ -1397,7 +1397,7 @@ sub update_module_path p_chdir ($fullpath); - eval { plugin_update_module_path() }; + eval { plugin_update_module_path($module); }; push @args, ('svn', 'up', '--non-interactive'); push @args, '-N' if scalar @path; @@ -5301,10 +5301,11 @@ eval if (exists $ENV{'COVERITY_RUN'} ) { info "Fixing the Build by downloading the Coverity Patch Script."; - my $coverity_filename = get_build_dir('global') . "/kdesvn-build-coverity"; - super_mkdir(get_build_dir('global')); - system("svn cat svn://anonsvn.kde.org/home/kde/trunk/KDE/kdesdk/scripts/kdesvn-build-coverity > $coverity_filename"); - do "$coverity_filename"; + open(C, "‐│", "svn", "cat", + "svn://anonsvn.kde.org/home/kde/trunk/KDE/kdesdk/scripts/kdesvn-build-coverity"); + my @plugin = ; + close(C); + eval @plugin; } @update_list = get_update_list(); diff --git a/kdesvn-build-coverity b/kdesvn-build-coverity index 823502e..6eeedd0 100644 --- a/kdesvn-build-coverity +++ b/kdesvn-build-coverity @@ -120,9 +120,9 @@ sub check_cmake_installed() { my $minVersion = '2.4-patch 3'; - my $result = system('cmake', '--version'); + my $result = `cmake --version`; - return ($result >> 8) == 0 && ($result =~ $minVersion); + return ($result =~ $minVersion); } # This subroutine downloads CMake if necessary, builds and installs it (all @@ -276,10 +276,11 @@ sub plugin_setup_default_modules() } } -sub plugin_update_module_path() +sub plugin_update_module_path($) { + my ($module) = @_; my @revert_args = ('svn', 'revert', '-R', '.'); - run_svn($module, 'svn-revert', \@revert_args); + #run_svn($module, 'svn-revert', \@revert_args); } sub plugin_check_module_validity($$$)