Formatting

KentonWhite · Apr 19, 2012 · 20fb9aa · 20fb9aa
1 parent e0a14e4
commit 20fb9aa
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/R/sql.reader.R b/R/sql.reader.R
@@ -105,7 +105,10 @@ sql.reader <- function(data.file, filename, variable.name)
     mysql.driver <- dbDriver("MySQL")
 
     # Default value for 'port' in mysqlNewConnection is 0.
-    if ( is.null( database.info[['port']] ) ) database.info[['port']] <- 0
+    if (is.null(database.info[['port']]))
+    {
+      database.info[['port']] <- 0
+    }
 
     connection <- dbConnect(mysql.driver,
                             user = database.info[['user']],