add comment

r-quantities · Jul 1, 2018 · 5536c0a · 5536c0a
1 parent 017ffd3
commit 5536c0a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/symbolic_units.R b/R/symbolic_units.R
@@ -125,7 +125,7 @@ as.character.symbolic_units <- function(x, ...,
 .simplify_units <- function(value, sym_units) {
 
   simplify = .units.simplify()
-  if (!is.na(simplify) && !simplify) {
+  if (!is.na(simplify) && !simplify) { # isFALSE(simplify)
   	value = as.numeric(value)
 	units(value) = sym_units
   	return(value)