From 39f7a6539315004832384022e3527a632c20ace7 Mon Sep 17 00:00:00 2001
From: bhklein <ben@rankone.io>
Date: Wed, 4 Nov 2015 13:29:27 -0500
Subject: [PATCH] Revert "sort algorithms case insensitive for tables"

---
 share/openbr/plotting/plot_utils.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/share/openbr/plotting/plot_utils.R b/share/openbr/plotting/plot_utils.R
index 514f9c3..ec7a7c3 100644
--- a/share/openbr/plotting/plot_utils.R
+++ b/share/openbr/plotting/plot_utils.R
@@ -51,7 +51,7 @@ plotTable <- function(tableData=NULL, name=NULL, labels=NULL) {
         input = tableData$Y
     }
     mat <- matrix(input, nrow=length(labels), ncol=length(algs), byrow=FALSE)
-    colnames(mat) <- algs[order(tolower(algs))]
+    colnames(mat) <- algs
     rownames(mat) <- labels
     table <- as.table(mat)
     if (csv) {
--
libgit2 0.21.4