Changeset 3280

Timestamp:

08/06/13 14:54:58 (11 years ago)

Author:

sanmai

Message:

• Fix test script.

File:

• monitoring/plugins/mpi/integration_test.R (modified) (3 diffs)

monitoring/plugins/mpi/integration_test.R

@@ -25 +25 @@
     base:::message(base:::paste("Running test", test_index));
 
-    command_line_arguments <- 
+    command_line <- 
         base:::paste(test_info[test_index,]$command, "-h", test_info[test_index,]$`-h`);
     
     if (test_info[test_index,]$`-u` != "") {
-        command_line_arguments <- 
-            base:::c(command_line_arguments,
-            test_info[test_index,]$`-u`);
+        command_line <- 
+            base:::c(command_line 
+                     '-u', test_info[test_index,]$`-u`);
     }
     
@@ -38 +38 @@
     test_output <-
         system2(command = "python2",
-                args    = command_line_arguments,
+                args    = command_line,
                 stdout  = TRUE,
                 stderr  = TRUE);
@@ -61 +61 @@
 test_results_df <- 
     base:::data.frame(description             = test_info$service,
-                      command_line_arguments  = command_line_arguments, 
+                      command_line            = command_line, 
                       test_results            = test_results, 
                       test_stdout             = test_stdout,