# HG changeset patch
# User greg
# Date 1498486173 14400
# Node ID 9b6252925ccf719f21b03868623043f9006e341e
# Parent  23c0f5c519ac3ed482f0dd4d7bdf5a96d30080c9
Uploaded

diff -r 23c0f5c519ac -r 9b6252925ccf ks_distribution.R
--- a/ks_distribution.R	Mon Jun 26 10:05:56 2017 -0400
+++ b/ks_distribution.R	Mon Jun 26 10:09:33 2017 -0400
@@ -155,7 +155,7 @@
 
 # Handle colors for components.
 if (is.na(opt$colors))
- {
+{
     # Randomly specify colors for components.
     specified_colors <- c('red', 'yellow', 'green', 'black', 'blue', 'darkorange')
 }
@@ -166,8 +166,10 @@
     parser$addData(opt$colors)
     raw_colors <- parser$getObject()
     specified_colors <- c()
-    for (raw_color in raw_colors) {
+    for (raw_color in raw_colors)
+    {
         specified_colors <- c(specified_colors, raw_color)
+    }
 }
 
 # Read in the components data.